,L6CD l0C)HCC WhL/h `CmCDiD`  R@P1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` DD˙` d J)L !D L(( LL()  L| L( S LH 0p n   CY?  q  L L  ` ) `A! d߰")-݆ "  $G@LLL&0") $G%H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0)8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH)  hyhyB q L> Lm JJ  Ln*` dB%'8  H H` 1 { LL   !L     Hh SY?  q  1L  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L) `L 0AM݊L݉ ML  N݆LLLNLMLHG!@1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q L !,0 ,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF G) *Gȩ GȽG GȌd q q G`  8   0G  `DCEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y`piH n0)բY? 08`0   0$L G GȽG L `8L`L8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE H8EEȱEEȩEh J E8   . m  i`LI!)E1FR1LJ舩9GIH`LJJ`HGHh l` S gL   8 rii `дCDCG W  C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}p OS DOSDOSTEMP SYS }P CDOSTEMP SYSB )MENU OBJBINOVERIFYBASBXNOVERIFYOBJBYPUTDOS OBJB?RELOCATESYSB NRS232 BASB^RS232 OBJB\RTL LIB Lk   DL  xԅP P zȢ ؅  z A POԍ ٍ/0ލ?@OP_`@XԍFG ` LPICYES)K9 M M M M M M M M M M M M M M M M M M M M M Mih8chH zi VihjhӭjHi(`H h(`H)h(`HHLHHLHHHH zHHHlhhhh@LL'L7LGiHH H zHHi`hjhӭjH(`-I,Ln-Ln,LnLyL!PBƝDEJ VPBԝDEHI V0pBԝDEJ V LLD1:CONFIG.SYSD1:RELOCATE.SYSpBHI V`  `  `p B V` 0% 8pBD0EHI VL]LrLPBԝDEHDwhHpBD0EHI VL]LrLPBԝDEHR1HpBD0EHI VL]LrLPBԝDEHJLKb'7n'bK0%Kh.?K' no cartridgeG1?zHKL]LrLPBԝDEH Q ^ S V!Y&t: 0?t1:&.Kt&& [^d  0u].tD!0 &&]4 3&5 A0]S tVY]^ 9SjS (V!YVY&SjS V!YVY&t? 0^>SWY]^tw" xt: 0"xt1:&,."xt&,"" &6JxA,J0^x,t.!0Tx,t*!0,"6x,>66,,..Q @6"@??,,.^,,6 ,J0x,t*!0"6x,>66,,.d.@6"@??"]^T Tt& ^^t !0TT^t&TT.&^ ^t !0JTT^t&T]^\mh" hSY&h!0ht/!0 h&  .rh=r0! hrt&rhA0 &.  hrhArt&  .hA0ghtNO_ 0a hhAt& 0&.d.g. hhAt& 1&  hSY&.p[^;| 0 |<| 0||]F]^OPP 0 P].SZ 02d].SZd@Z13&]^^m 0 0 extraG1 0 0 unrecognizedG10?z[^^H!  R           6 7 F G H I J [ !\ } ~    F$WORDF$DEF P$DIR0F$DIR1ZF$MATCHF$SCAN1F$POS P$SCAN0RP$SCAN2TS V!Y&t: 0?t1:&.Kt&& [^d  0u].tD!0 &&]4 3&5 A0]SSMY& 0ScYL.bDCSMY&S 0ESBWbXz.^D 0[S7WbXz.^?zh^mM* >0S,WbWlXDrive #BE is 10l0single densityG1h.double densityG"1h.returns error BEG1 [^XX ^XX ^XX ^XX H    DOS$CONFIGIN,DOS$CONFIGD7DOS$CONFIGSBF$WORDMble densityG#SYSS$_from: V*.*VYVY&"?*SS$_to: V*.*VYVY&SWV0VYDCSWAITV0VYDC SSV0VYDCSSINGLEV0VYDC SQV0VYDCSQUERYV0VYDC !SAV0VYDC$SAPPENDV0VYDC SYb'Xb'08-;SW$YSgY& 0Tz!0 0COPY  (Y/N)? 1&N 0..Y!0.^4-#u-SrW$W.Y&!0 4.ZtD 0%MMM455MREPLACE  (Y/N)? 1&N 0?..MY!0M.54-#u00y-;---.d50-;5"0SgY&.&.TLMa'/Xb'Mu0ERROR uB&EG1L./M`/0:MOUNT DEST. DISK, PRESS 1&/MOUNT SOURCE DISK, PRESS 1&/^^^^^^^^^Hntduif01reie9 nrGPr'amoce 2.edex;Hurpee ct01used3 edGBa a2d s .;difuHmenc!0nsti28ioon Pn Ghasi2seze.; eGHrr 20or!.;20 -"H V i#F$DIR1gF$MATCHrF$WORD}F$DEFP$DIR0P$SCAN0P$S(CAN2F$SCAN1F$POS$_from: V*.*VYVY&"?*SS$_to: V*.*VYVY&SWV0VYDCSWAITV0VYDC SSV0VYDCSSINGLEV0VYDC SQV0VYDCSQUERYV0VYDC !SAV0VYDC >07Xb'Ϙ5MD>0D ϘD:&D:&ϘϘ'b'π'('  yB' F$DEF&y'F$ALLOC&y'F$WOR*D&%y''P$CMD&-yn'/F$OBJ&5'7π8'ϘMq@ D:STARTUP.BAT&-4.}Ϙz5MϘ' '! ϖ0Sʀ}VY Ϙu0SYSTEM ERROR - uBEG1z- ØzM0mƒUA0 +U;ϤϘ0mƒϖ0NMN@Ϙ4πϘQU3&ςϘR5ϖ0KUG1.g˜5MϘ$ 1U3&ϘSW^WX.+π}&0‚π +A'π}&/ 0‚πb'+π}&π +A'π}&/πϠ,A'π}&/ϖ0ÂϘϘ/^(NSY&$ 0( 0EZLOAD FLOAD 0lSQSYVY.KILL 0SSYVY.PROTECT 0SBSYVYd. UNPROTECT 0SBSYVYe.ERASE 0SBSYVYf.RENAM-E 0SBSYVYg.DEF 03ĂSY& 0)G1.0Ă&.OBJ 0dĂSY& 0ZG1.aĂ&.END 0zĂϘ.SCREEN 0ĂϘ.NOSCREEN 0ĂϘ.DIR 0ĂSY&SB*.*VY4MĘ3&G1.ܠ.Ę5M.REPEAT 0ΘϘ.(.MDIR XDIR 0łπ''-z+!0q+bBEbBEG1.u1!0XDIR 0 bBEG1-z.u+  0>1XbBE freeG1.BATCH 0Ƃ/@SBSYVY.BAT&-4.TRAP 0ƂϘ.NOTRAP 02ƂϘ.PAUSE 0S1-Ƙϥ&.PRINT 0h-.CLS 0Ƙ7 '!.REM 0ΘȐ.SGWNΘYπb>'b'b'Z;0ΘϘ0ǂAΘώ0(͗ΘϘΒtG1.,1΃ϐ/@Ϙ4ςϘR5Ϙ^[b @ 0hǘzSWY&v΀'LOAD 0SGWΘY0[SBWY.OBJ&M.M5SnWY.OBJ&Θ4MbΠ1b0obΘb0olΘll'vl'vΘavvbb0@Șzlvalvb'vl'π'v'π'&ll A'vl'v'v'h''MΘ3&2!0\bΘbbv'πb''-z 0F + 0Θ Unresolved: G1- .Q b΀bi3&.Ș3&ΘATTACH 0v'.\.DETACH 0v'.\ɀv'&llA'vl'.3\ɗΖ0''l'''π''M50O y;iS;YΖ0gSWY'.nʂπ'[What?G1- .^ SGW͘Yb0 y;̀biS;Yπb'π0ʂπb4''[^/ 0:0.Ϙ0˂0A΃ό0.]0Η΃ϗΒt]^L% &:0h&].m&]^x9 ::0:].:]^9#&A΃ό0͗Θt& 05ΗΘ.&ΗΘ΃ό0͗Θt& !0; 0/̂Ϙ].:̂Ϙ]^E[^QSWY&π'+π}&+!0+ 0[πb'+π}&.o̗Θ0SQWY0̂ Ϙ[Θ0What?G16- ..̂'[^C bD'π'πD'']H +@yU7   '8<=>?!@ac0D ϘD:&D:&ϘϘ'b'π'('  yB' F$DEF&y'F$ALLOC&y'F$WORA/<6SY&6 0(DISK> 116&<6DC<<0J@z1MOUNT DISK AND PRESS 16&S}WYz^% %DBE:&B D %'0 0hC>]^/0LV&Z^ :H06<==F$WORDATTACH@z1MOUNT DISK AND PRESS 16&S}WYz^% %DBE:&B D %'0 0hC>]^/0LV&Z^ L&3^&1S?@'''Yh>\^V&(1R?@'' ' '0'Yh>\^&(1y>'' '$< '0'Yh>\^,&1N?@'' 'Yh>\^t& 3S"WWX30(1O?$='' 'Yh3>3\^#& 3S"WWX30(.H '344444444$>444 444DOS$STATUSDOS$READLDOS$WRITEDOS$CONFIGIN"DOS$CONFIGDjDOS$CONFIGS ' '0'Yh>\^&(1y>'' '$   > >Drive Allocation Bits: BEG1Drive Allocation Bits: 1DCNumber of Buffers: BEG1Number of Buffers: 1DCDisk Unit Number: 11DC0?zM  MOUNT DISK TO RECEI(@VE DOS.SYSG1IN DBE: AND PRESS 1 &MJDBE:DOS.SYSfzMDBE :DOSTEMP.SYS4 bb)>O*5DBE:DOSTEMP.SYS,DOS.SYSg   MuzH2.ct u ;HedB GE012G7 .;2(AExH.pr0H>Drive Allocation Bits: BEG1Drive Allocation Bits: 1DCNumber of Buffers: BEG1Number of Buffers: 1DCDisk Unit Number: 11DC0?zM  MOUNT DISK TO RECEI(8qօ֐Lm Lm Lm 0 Lmݶ Lm^  LmH L  Lu`eؑȱeّ֩ `eօ֐`S-.0MWxyV\])*+,  MOUNT DISK TO RECEI,KWLOS"Y&O!0OLEFT 0=LEFT=R>BEG1.ORIGHT 0aRIGHT=S>BEG1.OBACKGND 0BACKGND=>BEG1.OCHAR 0CHAR=>BEG1.OBORDER 0BORDER=>BEG1.OFINE 0FINE=n>BEG1.OhDREPEAT 0REPEAT=>BEG1.ODELAY 0=DELAY=>BEG1.OCLICK 0aCLICK=>BEG1.ODEV 0DEV=1<M)M>0M>@1*1.OVERSION 0 VERSION=2.0G1.ODOS 0DRIVES= >BEG1BUFFERS= >BEG1hE.What is O?G1L?OS"Y&.LzL^--HLM OF$WORD"BEG1.DEV 0 DEV=1<)>0>@1*1.VERSION 0 VERSION=2.0G1.DOS 0DRIVES= >BEG1BUFFERS= >BEG1hb $l0lȑ8e`i`֑ȑe`֑ȥבL8`8`8ȱ`8ȱ`84GሱՈ`8  ` 28eLȑȑieLȑiiL屴ȱ R8qȥq`ȱi汈M8ȱ 4H -% R֠qȥq`ȱ`&qȥq` ԑȥՑeL ȑȑeL ȑiL ԅՅ 2Le`88qȱqL 8ȑ 4IL R jL v jL fڰ TLL `ڰ TLL ڰ TLL (۰ TLLօFfԐ e֥e&`օׅ؅٢&&&8إ&&( eإe` %ȥ% L ȥ L 4JEȥE L IȥI L峅岅ԅՅ䳐֠ %&䲐 ```88 ȱ &ԑ &ԑԱѺ ```L4KL a) a) a) a)о a)е a)Ь L L L L L L }L }L }L }L }L }L8ȱȱȱ`8ԥ8ȱԈ` f88񰅺4L池L8񰅺池Յqԥqȥ0"Ѻ ԈѺLL屺ՐԐ 8 8񰅺池L8񰅺池 fڠ4M** L L馲0) )LLiHiHHȱhLhhL8iL` 8`HI ^iDiE`L l B H V0LL84N l쥲iDiEHIB V0HHH8}HLL ^ ԨԈL fL L l8KȱJB V0L l B V0LL` B V8Ԣ`)K)I JB#D4OE V07L8L8 LL8UȱVȱT` L ` BHI V0L `B V0L `B V0L8ՈԱԑL ^LL ^֑L4P ٰԅ֥Յ jL TLLL ^ii ذ TL ؠ0ȑ)ȑȑeL8 ^eԅiȑȑ8eL ^쥲qȱIJeLȑ4QLl  LȅɅl ȱi汥ȥL l8 BHI V0L l BHI V0LL l8MLN%B V0L l &B V0LNȽMLȥȥ4R‘ȥÑȥđȥőĥŠȱii ¥ie…eÅL ˆ  8ȥi L ˆ  8Lȱi池 ȑˆi L ˆ8 ȥ¤ȑ4SŲeiL ˆԑˆˆLi ¥iàȱ‘qȥqĥȑĠȱLȱȱM8񴅲ȥ񴅳泈eȱei ȥqqi ¥ià4TªŠLąȱąȱȱ 8岑ȱ峑i 浈i ¥iàȱ‘ąŅȱȱȱȱȱŠ ȱ` L L汅8ⅼ` W ȱe4UL W L8 EDIHB V0L LL#pB V0LL$L!L L8㈱ȑȑL ԍBՍC L 8` G IJL Ge4VeᤲL ԈLL ݰ TL L ݰ TL L ް TL L ް TL L88 ް ڰ ݰ TLL8IL IץI jL4WץԅL8)D)@D8岪LL8!0@ȑȑȑȑȑLLL8  LL8Ԡeԅȱiȑȑ8eLL4X8IL8IIiȩqL8LL8ȱȑiL8ȱ 2LȱiLuȱi汈ȑȑeL4YȱiLȱiԑL ˆ  ȥi L8L8L LLL ԑL8qL88L84Z1L8L8QLIL8ȱȱ` L 88񰅺池L8񰅺池qȦ0Ѻ ȱLѺ8tz84[^d8PND8068 8LLI芑LI芑L0 LLȱi池.(8ȱȥL4\L l8iDiEHI B V0LL l8iDiEHI B V0LL l ԝD՝EHIB V0LL l ԝD՝EHIB V0LL8 ^ ^ԥ84]L8岐ƲeԐդL 8 , ɛ  LȑeL儲HIB V0`L)Bf;Vr ,?BHNTZ`q$*04^6<?Eh&6?Kv &BTk,(Jx%m>+KQ{ 4`Pj.rBBKtF-BOe{5Mf}#4_j, $l0lȑ8e`i`֑ȑe`֑ȥבL8`8`8ȱ`8ȱ`84 $ LOAD COMMAND$ LOAD IO$ FLOAD SET$ SET /LEFT=0 /DELAY=24 /REPEAT=4$ CLS$ PRINT JLS DOS V2.00$ PRINT (c) 1985,2000 Jeffrey Glen Jackson$ PRINT$ REM SETTIME$ KILL SET$ MDIRR$ MDIR SET$ MDIR MDIR`8ȱ`88)53>4>5>*3BAV4BBU65B<Bq(0*A6qC**A60B(1*@`qC2*@`1BC0 0010BE:11 0011BE:12 0012BEG11H*0 VVY.BASVY&|SHWJSHOBJECTVSH*.OBJVYVY.OBJVY&!|SHSHLISTVE:VYVY&:|SHSHERRORVE:VYVY& pSHBASEV0VYDC' p p'{4|4!|4:|4MtGJLS BASICDe V1.0G2 (C) 1985 by Jeffrey Glen JacksonG22U|'|&"RSL9Xg'qo'o'Q'R'S->XW|DEF!W|REM!0CW|REM 0,S%Yo0!HR0Rp)pIpI0 ^2pIU|'UDf|U| '*HOU|U|'oU|'p'Q0 Qp)pIOpIOppI'-ppI'-ppI'-pI0ppIp'-.ppI'-pppIpI'pIp'U|U| '*DgoU|QIp'.oU|'oU|'OU|U|'R0Rp)pIpI0ypiJG2pI p*2Rp)pI0piJG2pI p*oU|'55| 4#RP#RPp p'-Dhoo p'oo p'oo p'po'-po'- IOp'#RP#R0p$RP$R0m$R$R#RP.#R0#RP#RP.#R0$R#RP.#R#R#RW#Rx#R#R#R0-ppo'Di-.#R)#R,#R#R0#RP.#R-#R.#R0#RM0-pp'p0sppI p'-pqo0F.p0.o'sog'oso0 Guooso 'puoI0souo'..puoI0ouoDj'.puoI p'-.#RH0}Q0QQp)$R#RP-ppo'-*5SUCCESSFUL COMPILATIONG2.H.#RV#R\#R]#R0#RP.#RS#Ry0%RS|R#RPp#RI p'#RP-.#R^Dk0-pp p'--ppo'--ppo'-%RS|RpP%RS|QpIO#RPpIpI0ppIpIIpIIp I'.pp I'-.#R#R0%RS|R#RPp#RIDlo'-.9%RS|R#RP$RPp$R #R'/%RS|Qp/^/JKgLqLS->XW|PACKAGE 0^I}'.eI}'W|PACKAGE W|MAIN 0 KS8X'K0EKIKIKIKI0L S9XKIK)S->DmXKIK_JW|&KIKI&R0DS->XKKI0@ W|)!0?D.J W|,!0&D*KIU|'^OU|U| 'U|KI Q KOKI OOO. iJW|&R'IOODnOOOOOOK'O. KIQKIR5LKIKI0N 5LS9XW|DECLARE!0S9XW|BINARY 0 !L+L. W|FLOAT 0 !L+L. W|STRING 0 !LS9XS->X&R0qD+LW|DCDo+L0qDS:X. W|BYTE 0 !L+L. W|PROC 0 !L. . W|RECPROC 0< !L. . W|FNC 0U !L. . W|RECFNC 0q !L. . W| ENDDECLARE 0 .. W|PRIVATE 0 I}'S->X. . .DS->X&R0DQ_JW|&QI!L?DpLQI+LQIQI5LS->XW|(!0l S->X&R0DQ?LIW|DC'?L?LS->XW|, ?L0 W|, 0DW|)!0?DS->XQI?LR+L'?L0 ?LK)RRQKI '*Q0 I'QIQDqIR'QQ'W|, 0 W|: 0 S->X.f W| 0 SL9XS->X.f .XDS9XS->XW|BINARY 0> IL. W|FLOAT 0V IL. W|STRING 0o IL. W|BYTE 0 IL. .DS:XS->X&R0DRiJW|&RIILRI!LRIQRDrIRII} L'S->XW|(!0S->XW|BINARY 0SL+L.W|FLOAT 0<SL+L.W|BYTE 0YSL+L.W|STRING 0SLS9XS->X&RW|*!0qDW|* 0+L.+LW|DC+L0qDS:X..D?LS->XW|(Ds!0M?L0DS->X&RW|*!0DW|* 0Q?LI'.'Q?LIW|DC'?L?LS->XW|, 0W|)!0?DS->XQISLQI?LQ0~I'QI+LQIQI'QIQI L L'QDtQ'W|, 0 W|)!0?DS->XRI LRR'W|, 0 . {W|&{REM 0-SL9XS->X.S8X0N{LET&"R"RW|A{']L{FOR {LET 0x]L{J"R'LSXW|: DuW| 0%W|, W|= W|TO W|STEP W|THEN 0x.~EKIQKIS9X.{J"R'{IF 0{0oIqo'oIqo'oo'qoqo'S;TXO0OoIU|U|'.%.{0.+F.S;DvTX0OU|U|'S;TX.%{ELSEIF 0P{0+F.OoIU|U|'oIIU|'oIqo'qoqo'.}.%{ELSE 0{0+F.OoIU|U|'oIIU|'oI'.%{ENDIF 0 {Dw0+FoIIU|'oI0oIIU|'oo'.%{WHILE 0{0+FoIqo'oo'qoIU|'qoqo'S;TXO0OoIU|U|'.%{ENDWHILE 0{0+Foo'.OoIU|DxU|'oIIU|'.%{REPEAT 0({0+FoIqo'qoIU|'oo'qoqo'.%{UNTIL 0u{0+FS;TXO0Ooo'oIU|U|'.%{GOSUB 0-O{0+FS;TXU|U|'.%{GOTO 0.DyO..%{TRAP 0MO..%{PROTECT 0?Ld{0+FSg;TX?LOU|U|'.%{ UNPROTECT 07?Le..%{ERASE 0R?Lf..%{RENAME 0n?Lg..%{RETURN 0{0+F/OU|U|'.%{LET 0c{0+FS;DzTXS->XW|=!0nF"RJS->XKS8X'K0DLKI'L0S+;TX'O.UL0-SI;TX(O.UL0HS;TXO.USg;TX&OU|U|'.%{FOR 0{{0+F"RJS->XKS8X'K0DLKI'LD{0DL0qgLgLgLqL0qLgLS+;TXS->X{0W|STEP!0FS+;TX.+OOOU|U|'S;TXS->XW|=!0nFS+;TXS->XW|TO!0F)OgLOU|U|'.L0;SI;TXS->XgLgLgLqL0qLgL{0W|D|STEP!0FSI;TX.O@OOOOOOU|U|'S;TXS->XW|=!0nFSI;TXS->XW|TO!0F+OgLOU|U|'.S;TXS->XgLgLgLqL0cqLgL{0W|STEP!0FS;TX.OOU|U|'S;TXS->XW|=!0D}nFS;TXS->XW|TO!0FOgLOU|U|'oIgL'oo'.%{NEXT 0{0+Foo'?LoI"RJS->XKS8X'K0DLKI'L0w*O?LOgLgL.L0O?LOgLgL.,O?LOgLgLD~U|U|'.%{PRINT 0?{0OOO1OU|U|'.<{09Sg;TXW0&GOU|U|'1OU|U|'.<.+F.%{PRINT# 0{0wOOOU|U|'.{0Sg;TXW0GOU|U|'..+DFS;TX{0SN:X2OU|U|'.%{LINPUT 0?L3{0+FOOU|U|'K'{KK)"RKJS->XKS8X'S;WKXK{0SSN:XLKI'?LOL0S5Y'O.L0Se5Y(O.L0DS96YO.&OU|U|'*OU|U|'.%{LINPUT# 0?L3{0+FS;TXSN:XK'..%{INPUT 0/?L..%{INPUT# 0K?L..%{OPEN# 0{0+FSg;TXS;TXSN:XS;TXSN:XS;TXSN:X4OU|U|'.%D{CLOSE# 0?L5{0+FS;TX?LOU|U|'.%{BPUT# 02?L`{0+FS+;TXS+;TXSN:XS;TXSN:X?LOU|U|'.%{BGET# 0M?La..%{POKE 0?L{0+FS+;TXSN:XS;TX?LOU|U|'.%{DPOKE 0D{0+FS+;TXSN:XS+;TX'OU|U|'.%{GRAPHICS 0?L7..%{COLOR 0 ?L8..%{SETCOLOR 0[{0+FS;TXS;TXSN:XS;TXSN:X9OU|U|'.%{POSITION 0y?L:.a.%{PLOT 0?L;.a.%{DRAWTDO 0?L<.a.%{FILL 0?L=.a.%{STOP 0{0+FLOU|U|'.%{PUT# 03{0+FS;TXS;TXSN:XOOU|U|'.%{GET# 0y?LP{0+FS;TXS;TXSN:X?LOU|U|'.%{POINT# 0{0+FS;TDXS+;TXSN:XS;TXSN:XQOU|U|'.%{NOTE# 0 {0+FS;TXS;TXSN:XS;TXSN:XROU|U|'.%{CALL 09!{0+F"RJSBXKS8X'K0FSOKOOU|U|'KI0 S9X?LKIKIDK)S6?LKYSBXW|)!KKI0?DW|,!KKI0&D*KI0!XOU|U|'.6!KI03!YOU|U|'.6!.E.%{DEF 0j!"RJS%Y{'J"R'.%{ENDDEF 0K"{0+FK IqLKDIQ0!QKKI)KI*KIR0"RKKI)KI*KI0G"KIKIKKI)KI*[.%{RET 0\#KIKI0"{0+FKI0"ZDO."[OU|U|'.Y#{0+FKI0"S+;TX+L.%#KI0"SI;TX+L.%#KI0#S;TX+L.%#Sg;TX+LKI0C#\O+LO.N#]O+LOU|U|'.%{EXEC 0#{0+FS+;TXhOU|U|'.D%{MOVE 0#?Li{0+FS+;TXS+;TXSN:XS+;TXSN:X?LOU|U|'.%{RMOVE 0#?Lj.#.%{ERROR 0$?Lz..%{FPOKE 0W${0+FS+;TXSN:XSI;TX(OU|U|'.%{SPOKE 0${0+FS+;TXSN:XSg;TX&OUD|U|'.%{CHAIN 0$SBX5W|W|At4.%.%{DGET# 0$?L.G.%{DPUT# 0*%{0+FS+;TXS;TXSN:XOU|U|'.%{FGET# 0E%?L.G.%{FPUT# 0%{0+FSI;TXS;TXSN:XOU|U|'.%{DEND 0%{0+F IqL[.%.9G"R{JS->XW|!0S9X.^%K{L WSBXW|( 0&LS%YSBX./&R03&O{LW|DC'{LU|U|'L./&R 0&W|A0G{LW|W|AtDC'O{L OU|U|'L./&RD0&OLW|D(L)LL>O*U|U|'L./&R0'OW|AOU|U|W|A'LW|A0'W|W|At2./W|+ 0 './W|- 0|'LS% YL0J'vO.n'L0\'O.n'Se5WLYLwOU|U|'./&RD0'.E./W|PEEK 0'S9XS4YS":XL>OU|U|'./W|ASC 0'S9XS4YS":XL?OU|U|'./W|CHR W|CHR$ 07(S9XS4YS":XL@OU|U|'./W|LEN 0l(S9XS4YS":XLAOU|U|'./W|BIN 0(S9XSD4YS":XL./W|FLT W|VAL 0(S9XS4YS":XL./W|STR W|STR$ 0(S9XS4YS":XL./W|MID W|MID$ 0)S9XL"RSBX"RL{LS8X'{L"RoI0v)S4YSN:XS4YSN:XS4YS":XLFOU|U|'.)S`:YSND:XS4YSN:XS4YS":XLtOU|U|'./W|NOT 0)S9XLS%YS":XL0)O.)S5WLYLOU|U|'./W|ADR 0!*S9XS`:YS":XL./W|DPEEK 0X*S9XS4YS":XLbOU|U|'./W|EXP 0*LkS9XS4YS":DXLLOU|U|'./W|CEXP 0*Ll.k*./W|LOG 0*Lm.k*./W|CLOG 0*Ln.k*./W|ABS 0E+S9XLS%YS":XL0+pO.7+L0%+O.7+Se5WLYLoOU|U|'./W|INT 0^+Lq.k*./W|SGN 0+S9XLS%DYS":XL0+sO.+L0+O.+Se5WLYLrOU|U|'./W|ERR 0+LuOU|U|'./W|DESC 0e,S9XS->X{LS8X'{L0#,xO{L .M,{LS8X'{L0J,yO{LOO.M,.ZGU|U|'S":XL./W|FPEEK 0D,S9XS4YS":XL{OU|U|'./W|SPEEK 0,S9XS4YS":XL}OU|U|'./W|BYT 0,S9XS4YS":XL./W|BOUND 0\-S9XS->X{LS8X'SN:XS4YS":X{L0E-O{L .H-.ZGLU|U|'./W|INSTR 0-S9XSD4YSN:XS4YSN:XS4YS":XOU|U|'L./{LS8X'{L0.SO{LOOU|U|'{LI0e.S9XL{LI'{LIL)S6LLYSBXW|)!L{LI0?DW|,!L{LI0&D*{LDI0}.XO..{LI0.YO...EU|U|'L{LI./{LS8X'{L0/{LI0./S9X{LIL)S4YSBXW|)!L{LI0?DW|,!L{LI0&D*L{LI{LI{LI0/L0j/O./DL0|/O./L0/O./O{LOO./L0/O./L0/O./L0/O./O{L U|U|'./.EL"RSBXW|THEN!W|TO!W|STEP!W|,!W|)!W|!0G0"RLL]K00K01K0D1K02K03K0e4K04W|;!00S5WLYL"RSBXLW|: W| 00W.;0"RLS4YOU|U|'.4W|EOR!0>1L01S4YO.01S5WLYS4YL OU|U|'.4W|OR!01L0b1S4YO.{1SD5WLYS4YL OU|U|'.4W|AND!01L01S4YO.1S5WLYS4YL OU|U|'.4&R02W|= 01L.J2W|<> 02L.J2W|> 02L.J2W|>= 002L.J2W|< 0D2L.J2LL0x2S4YLDOU|U|'L.2L02S4YLOU|U|'L.2L02S4YLOU|U|'L.2S4YL OU|U|'L.4&R03W|+ 03L.3LL0@3S4YLOU|U|'.3L0h3S4YLOU|DU|'.3Se5WLYS4YLOU|U|'L.4W|*!03LL03S5WLYS4Y OU|U|'L.3Se5WLYS4YOU|U|'L.4W|/!0e4LL0>4S5WLYS4Y OLU|U|'.b4Se5WLYS4YOU|U|D'L.4W|^!04Se5WLYS4YNOU|U|'L.4.4.;0./^4JL S5S%WJYY[^4JL Se5S%WJYY[^4JL S5S%WJYY[^4KL S96S%W KYY[^ 5KL K0'5COU|U|'.c5K0I5DOCOU|U|'.c5K0c5ODU|U|'[^o5KL K05BOU|U|'.5K05DOU|U|'.5K05OBOU|U|'[^50KL 1K05BOEOU|U|'.761K06EOU|U|'.761K076OBOEOU|U|'[^C6&KL 'K0`6OU|DU|'.6'K06COOU|U|'.6'K06DOCOOU|U|'[^6:KL L;KIL;KI"RoI07L"RSBXLS8X'L07LIL07L;KI;KILI07LLI0GL07LDL);KLILLI;KLI0G*;KILI0GWOL U|U|'.8"RL.7.8"RoI0R8L07S4YTO.D8L08S4YUO.D8L0 8S4YO.D8S4YVO;KIOU|U|'U|U|'D.8L"RSBXLS8X'L07"RLLIL07S`:Y_OU|U|'[^8KLK}'R08RM})W|M}iJ M}I08K}M}'*K}\^8KMO}'Q0F9QQ})W|Q}_J Q}I0D9O}Q}'*O}\^DV9DK%M|3&|G2"RS->XS}W|DC'gIS}'gIU|'gg'Z^9DK/MS->XW| 09SL9XS->XZ.9W|:!09.XD.9S->XZ^9DK/MS->XW|(!0CZ^:DK/MSBX.9^:DK/MS->XW|)!0?DZ^,:DK/MSBX.:^>:DK/MS->XW|,!D0&DZ^X:DK/MSBX.B:^j:DK/M /M"RoI/M0ES->XCMS8X'CM0 F/MCMI/M0:S9X/M9M)S4Y9M/M0:SN:X.:SBX*CMICMI0;OCMOO.;OCM U|U|'[^5;DKMM "REKJS4DYZ^S;NKMM "ROKJS4YZ^q;XKMM "RYKJS4YZ^;bKMM "RcKJS`:YZ^;vKMM "RwKJS4YZ^;lKMM "RmKJS->X&R0CU}W|DC'U}S->XW|:!W|!0CZ^XW|: W| 0E<D]W|( 0h<kMMS<YS:X.<&R0<WM"RS->XW|( 0<uMMS<YS->XW|, 0<W|)!0?D.<. =.<&R&R&R&R 0<kM.<&R0<kMS->X.E<.<.EWM"RS->XW|= K0"=.=.=W|; 0[=kMWM"RS->XWD|: W| 0=kM.E<.=&R&R&RW|AND W|OR W|EOR 0=kMS->X.E<.=W|TO W|STEP W|THEN 0=.=.=W|, W|: W| W|) 0=.=.=.JE"RWMkM0 >aM.>uM0>aMMoIaM]^7>DKMW|&DW"RZ}|AWZ}0B-BW} !0>WW-BW} 0c>"RyIW"R"RWW}A#W}Z%0?&RW|W|W}&WWWZ}0B-BY}W}A#W}Z%W}0#W}9%Y}Y}W}$ W}% W}# W}_ Y}0>.BW}0#W}9%0?&RW|DW|W}&WWWZ}0B-BW}0#W}9%07?W}. W}E 0?.BW}. 0@&RW|W|W}&WWWZ}0B-BW}0#W}9%0?W}E!0BW|W|W}&WWWZ}0VC-BW}+!W}-!0%@W|W|W}&WWWZ}0VC-BW}0$W}9"0VCDW|W|W}&WWWZ}0B-BW}0$W}9"0BW|W|W}&WW.BW}& 0@&R W|W|W}&WWWZ}0B-BW}0#W}9%0@.BW}< 0$A&RW|W}&WWWZ}0B-BW}=!W}>!0BW|W|W}&WW.BW}= 0IA&RDW|W}&WW.BW}> 0A&RW|W}&WWWZ}0B-BW}=!0BW|W|W}&WW.BW}+ W}- 0A&RW|W}&WW.BW}* W}/ W}^ W}; 0B&RW|W}&WW.BW}"@ 0YB&RW|W}&WWWZ}0|DC-BW|W|W}&W}"@!0BWW.BW}, W}: W}( W}) 0B&RW|W}&WW.B.C"RyIW"R"RI&R"RWWWZW}|Wt&/^BDKM"R|A0OC|"Rt 0C"R"R"RyI"R|A0LCW||"R"RyIt&&R"RDI"R"R"RyIW"RZ.VCW|&Z000 Bad floating point numberG2.;H001 Bad string literalG2.;H002 Bad character in lineG2.;H003 Bad line #G2.;H004 'DEF' expectedG2.;H005 '(' expectedG2.;H006 Bad variable nameG2.;H007D ',' expectedG2.;H008 ')' expectedG2.;H009 ':' expectedG2.;H010 Bad string lengthG2.;H 011 Bad typeG2.;H%012 Illegal or undeclared indentifierG2.;H013 Bad dimension sizeG2.;H014 Too many dimensionsG2.VH0015 Constant/variableD/function/unary op expectedG2.;H+016 Binary op or end of expression expectedG2.;H017 Expression divider expectedG2.;H018 Undeclare procedureG2.;H019 Procedure used as functionG2.;H020 Variable expectedG2.;H021 Identifier expectedGD2.;H022 Incorrect # of expressionsG2.VH023 'THEN' expectedG2.;H024 '=' expectedG2.;H025 'STEP' expectedG2.;H026 'TO' expectedG2.;H027 Procedure name expectedG2.;H!028 Phase error - invalid syslineG2.;H029 Phase error - invDalid line pBEG2.;H030 Unrecognized commandG2.;H031 NondescriptorG2.VH 032 TRAP uBEG2.H033 Mismatched # of dimensionsG2.;H 034 Mismatched size of dimensionG2.;H035 Mismatched string sizeG2.;H036 Invalid syntax of byteG2.D;H037 Nesting ErrorG2.H'W| ' encounteredG2|G2W0}HW"R-2$G2QBE variablesG2RBE subprogramsG255^IIJ^IIJ^IIJ^IIJ^IIJ^IIJHMQ0gDQRR R"Ri#R$R%R&Ry'RykRySS0 VWmW8WggqoosoƩ8uo@0wooooDyo"opp0py8pC p p0xA{y{{{}|C!|:|ES|U|yW|yS|0I} FK}K}{K}lK}D͵K}GK}K}[K}K}εK}HK}K}\K}K}K}IK}K}]K}K}εK}JK}K}K}K}K}ykK}M}O}Q}εDS}ymU}W}X}4Y}ζZ}n[}\}]}^}ζ_}`}b}d}f}@g}h}i}j}p}ζr}t}u}[v}K}жMD}O}Q}]S}}}}U}_}}}}}a}W}Y}Z}P$SCAN0HP$SCAN2HF$SCAN1HF$POSHF$DEFHF$MATCHH4:|4MtGJLS BASICDSsY& 0(SOURCE> 1&DC0F@zSsY& 0kDEST> 1&DC0AzSsY!0AzS~WgWXz 0.S~WqWXz 0.H0Cz 'b'Xb'  ''-.P0P-''0x'')SWgW?WW{X0 BAD SECTOR: BEG1'*0-E')SWqW?WHWXz'*0BL1"MOUNT SOURCE DISK AND PRESS 1&/!MOUNT DEST. DISK AND PRESS 1&/^^^^HH F$WORDsDOS$STATUS~DOS$READDOS$WRITE0.HSzY&SzY&  SzY!01?zSWY&SWY&44Mp&G2.^55z^^H!!!F$WORDzF$DEFDOS$WRITE0.LSv YdS VVY&S LINESVBEVYDC'S Yd 0K.\dSk W Y&b'b'''}BASIC program editor V2.00G1"(c) 1985,2000 Jeffrey Glen JacksonG11MNEW BE&.5P1u@0Non existant lineG1.uA08Out of memoryG1.uB0VToo many linesG1.uC0uString requiredG1.u0b'z..SYSTEM ERROR - uBEG1b'z00L1EDITG13&A0EPS! Y&Et0#Et9%0wA0SS EDCTY' EDC0I@zSA W Y.qS EDCTAtVY.. ELIST 0Sw W W Y)S W Y*. E$ 0S W WNX;0MP. ESAVE 0fES! Y&E!0)dSk W Y&Sw W W Yd4)S W Y*5. ELOAD 0dSk S! YVY&LOADING d1d4M''3&?0?90'Ma..P.3&0BzES! Y& EDC' 'At&&'A'0|..MAzuB0.M5. EMERGE 0dSk S! YVY&d4M3&S S! YDCTAPtVY.M5. EDELETE 0:Sw W W Y)SA W Y*. EDOS 00 FILE CHANGED.G1d 00PUT? Y1E&EY 0=.SAVE? Y1E&EY 0 L. EFREE 0BE free bytesG1BE PlinesG1 Maximum of BE linesG1. ENEW 0''0>d&ES! Y&E!0EDBC''x b 'x 'Xb '. EFIND 0(A0CzPAt&) }0#S W Y*. EPUT 0ES! Y&E!0ZdSk W Y&Sw W W Yd4) }G2*5. EGET 0{dSk S! YVY&d4Ma''P'3&0Bz ' '&' 'A'0Y..aMAzuB0r.M5. EREN 0 ES! Y&E 0 ' '.EDC''ES! Y&E!0EDC'P) ''*. WHAT?G1.^+ **&>A>0 4t&4 4, 0p .C **4&>0 4t&4 !4,!0p *]^ H 0   BEP   }G2[^ H H'R'RH0q \HR '\ 0M R\'. .l \ 0l H\'. \]H]^ fzS! Y&z 0 f 'p '. fzDC'zS! Y&z 0 pf'. PpzDC'S WfY'S WpY'f p 0# @zp 0? '[^K  0W [ '0 ''.  '>'i''P)  '  '*[^ S WY'0`  0P SA WY.` 0` BzA'0 &' ' ''.V ' P  j)  '  '* & ''[^b '[^ %^ %^ %^ %^ %^ %^ %HzEQF S Y- S,VS7*.*VYVY&@ S!OUTPUTVE:VY&S S!LABELVVY&} S!DATEVVY&h S!INITVVY& S!NUMBERV1VYDCSYS7WLY*.*4MA  B&M5 S Y@ E: 0K:T4 .  S7WVY4h G2S !00S G2} !0A} G22   BG2 0   0 P 0 BtDCBE USED SECTORSG2 BE FILESG25 05L^T0[.)S+WWWYSWYSWY[^5 (< B& (2 0(2(B t< t#0((.[((202B(B&2(2B t< t%022.22(0(TB2B&.UB<&[^BB^BB^BB^BB^BBHBG- @  S !h 6} A B C D E F F F F F F TF F F F F F G H I P$SCAN0 P$SCAN2F$SCAN1!F$POS,F$DEF7MBERV1VYDCSYS7WLY*.*4MA  B&M5 S Y@ E: 0K:T u0ERROR uBEG1zXb'M &7  5bb'G1&JLS MENU V2.0 (c) 1985 Jeff JacksonG11%D. Default Disk M. Module DirectoryG1"E. Erase Files P. Protect FilesG1!F. File Directory R. RenamXe FilesG1$K. Kill Modules U. Unprotect FilesG1"L. Load Module X. eXternal Dir.G11 R>   b'  : BE.  }G1  0  R>   b' b0nR>:CHOICE> 1 & D 0'X DEF& CHOICE> DEFG1DEF> 1 &. F 0j DIR& CHOICE> FILESG1 PATTERN> 1 &. E 0 ERASE& . K 0 KILL& . L 0 LOAD& . M 0 MDIR& CHOICE> ModuXle DirectoryG1 &. P 0) PROTECT& . R 0I RENAME& . U 0l UNPROTECT& . X 0 XDIR& &CHOICE> eXternal Subroutine DirectoryG1 &.  b'  DC0INVALIDG1L. 1!0 XDC   b'S  }VX 00 CHOICE>  G1 0I FILE(S)> 1. 0aMODULE> 1. 0OLDNAME,NEWNAME> 1 0 3& 00 !0   &S   VX.*^   S  V!Y& t: 0X  t1:&.   t&  & [^# *   04].d tD!0d*  & &* ] 4 4 * 3&5 * A0]S *  tVY]^ > 9> S)S  V!YVY&H S)S  XV!YVY&R > R t? 0> R H R >SW> Y]^3 \   t: 0]\  t1:&f .o\  t&f \ \ &p   Af 0 f t.!0 f t*!0\ p  f >p p f f X.. z p \ z ??f f .f f p f 0 f t*!0k\ p  f >p p f f .#.z p \ z ??\ ]^    t&   t !0   t&  .&X  t !0    t& ]^ [^' N i. b' bb'[^q N i[^  A0/ = G1/ =1 3&. ] ]^   X@ 1 3& ]^ [^& & ^& & ^& & H                  X   !  # < = V o p         P$CMD F$WORD F$DEF F$SCAN1XF$POSP$SCAN0P$SCAN2ATTACHDETACHgP$DIR0F$DIR1F$MATCH5bb'G1&JLS MENU V2.0 (c) 1985 Jeff JacksonG11%D. Default Disk M. Module DirectoryG1"E. Erase Files P. Protect FilesG1!F. File Directory R. RenamXLJSYSS$_file: VVYV!Y&JSQUERYV0VYDCSYS W+YSY& 0MJ0CAT  (Y/N)? 1)&)N 0.L.)Y!0.]M43&G1.5.L55L^!! ^!! ^!! ^6GGSYRS(LEFTVR>BEVYDCSS(RIGHTVS>BEVYDCS(CHARV>BEVYDCS(BACKGNDV>BEVYDCS(BORDERV>BEVYDCnS(FINEVn>BEVYDCS(DELAYV>BEVYDCS(REPEATV>BEVYDCS(`CLICKV>BEVYDCSY^33^33^33HHHP$SCAN0P$SCAN2F$SCAN1(DV>BEVYDCS(BORDERV>BEVYDCnS(FINEVn>BEVYDCS(DELAYV>BEVYDCS(REPEATV>BEVYDCS(`pSQY& 0; ENTER TIME:G1 HH:MM:SS> 1&A0t:!0t:!0tDCtDCtDCBB!`BA6B@`@(BU6qCBUd6B(AVqCAVBC^\\HF$WORDQBA6B@`@(BU6qCBUdKWLOS"Y&O!0OLEFT 0=LEFT=R>BEG1.ORIGHT 0aRIGHT=S>BEG1.OBACKGND 0BACKGND=>BEG1.OCHAR 0CHAR=>BEG1.OBORDER 0BORDER=>BEG1.OFINE 0FINE=n>BEG1.OhREPEAT 0REPEAT=>BEG1.ODELAY 0=DELAY=>BEG1.OCLICK 0aCLICK=>BEG1.ODEV 0DEV=1<M)M>0M>@1*1.OVERSION 0 VERSION=1.0G1.ODOS 0DRIVES= >BEG1BUFFERS= >BEG1h.What is O?G1L?OS"Y&.LzL^--HLM OF$WORD"G1.OBACKGND 0BACKGND=>BEG1.OCHAR 0CHAR=>BEG1.OBORDER 0BORDER=>BEG1.OFINE 0FINE=n>BEG1.OhbSY~SS$_file: VVYV!Y&SSOUTPUTVE:VYV!Y&SLINESIZEV80VYDCSFORMSIZEV66VYDCSTOPV6VYDCSLEFTV5VYDCSINITVVY&SQUERYV0VYDCSHEADINGV1VYDClSINDENTV2VYDCSYSWY?*0<@z4  ~SY&~ 0`M]0TYPE ~ (Y/N)? 1&N 0.h.Y!0.yM3~42l0%-d~ PAGE #BEG22.+3&A0^2.0-dtG20 2..d-dltG200 2..+ 25.h55L0 20 2/^^^^^^^lHX0ZAu0M~X'vXX!&XX#&#z.|tu&X'#= [0J0|t}v#!'-ƅu#X#XXXz&X|l&F$DEFF$SCAN1F$POSP$SCAN0P$SCAN2P$DIR0F$DIR1YV!Y&SLINESIZEV80VYDCSFORMSIZEV66VYDCSTOPV6VYDCSLEFTV5VYDCSINITVVY&SQUERYV0VYDCSHEADINGV1VYDClGSY&ON 0 yW.OFF 06yP. 0y>W0^ VERIFY IS ONG1.y>P0} VERIFY IS OFFG1.VERIFY IS INVALIDG1.@z^H!F$WORD^ "0SW(  VX.@FIN> 1M`DC08S3XS(X.`0VS3XS(X.`S(XPITCH> 1MDC'SWH X0FREQ=BV@@CBEG1.0FREQ=B9!@@CBEG1.FREQp=Cx@@CBEG1.^>> ^>> ^>> HSOUND16SETFIN(SETFIN153FREQ=B9!@@CBEG1.FREQpSjYSS$_File: VVYVY&SuY 4MfRP0`Q O095^^^^H !6ABP$SCAN0jP$SCANuR1HpBD0EHI VL]LrLPBԝDEHx^2 BD'HA'0fJ0|KhC>zZ^5 SW6  VXb\^ "0SW(  VX.@|B(D"'H,'J KhC>zZ^V?SW@"WJWTXZ^u](SW^$WhWrW|XZ^(SW&WWWXZ^ SW  VXZ^b'P?|@'' ' 'Yh>z iYh>z b'h bhSbTY'LV&[^m ''>R?0'.'>0{[^H|F$ALLOCATTACHDETACHcOS$C|IOVR$STARTCONR$BUFFINR$CONTROLLR$BAUDkR$TRANSLATER$FORCEA'0fJ0|KhC>zZ^5 SW6  VXb\^ "0SW(  VX.@|Kh S:YSfSPInput> VVYVY&SfSPOutput> VP:VYVY&SEINITVVY&SECCV0VYDCSEPAGEDV1VYDCSESKIPV0VYDCS:Y44203&M06SX&!0t1 0X6 2 0O  2 .t0 02.t- 022A0AtG2.2.G20B2.Mu0uz55L^3& 043&\^qq ^qq ^qq ^qq ^qq H OM", PA"  RI " SO," N  CO", MP"  LE " TE," ]  ", EO"  T. " .," P$SCAN0:F$SCAN1EF$POSPP$SCAN2[F$DEFfP:VYVY&SEINITVVY&SECCV0VYDCSEPAGEDV1VYDCSESKIPV0VYDCS:Y44203&M06SX&FK:4b'b'&0>O 4'R}G1 ̠̠G1! Copyright (C) 1985G1 byG1! Jeffrey Glen JacksonG1)*i    }} ~~{{}}>1.&. 0.L 0'.SXSPXM'>0PS"WXSFX0$SX&%0$'0$?O1.5M&0A`'SX.^ZhR: 4SQTTXZ^h 0f 2)*Z^rS\WR1:VXSgWWR1:VXSrWWR1:VXZ^r5M}LOCAL MODE COMMANDSG11SX 1-8 Directory of disk nG1 E start Echo modeG1 C Close echo modeG1 D DownloadG1 U UploadG1 R ReconfigureG1 X eXit to remote modeG1 Q Quit to DOSG111> 1.&.1#.8%.A01D.:*.*4M(.&.G1.M5.}.E 0&0bEcho mode alread activeG1. To file: 1O&OS}O.TXTVX&MO 4.M5O4&'.}.C 05&.}.D 0  To file: 1p&SS}p.TXTVXVX.}.U 0C From file: 1p&SB S}p.TXTVXVX.}.R 0USX.}.X 0dZ.}.Q 0sL.}What?G1P.^r}Reconfigurable Parameters:G11 B. BaudG1 S. Stop bitsG1 O. Output ParityG1 I. Input ParityG1 T. TranslationG1 U. Upload/Download ModeG1 X. Exit this menuG1M11> 1.&.B 0o...S 0....O 0...I 0. ..T 0.o ..X 0Z..U 0. .G1.}Baud:G11 A. 300G1 B. 45.5G1 C. 50G1 D. 56.875G1 E. 75G1 F. 110G1 G. 134.5G1 H. 150G1 I. 300G1 J. 600G1 K. 1200G1 L. 1800G1 M. 2400G1 N. 2400G1 O. 9600G1 P. 9600G1#R>#:*G1R>:> 1.&. 0.+.A$.P".A0.+#.?A#SX. }Stop bits:G11 A. 1G1 B. 2G1# R>#:*G1R>:> 1.&. 0..A$.B".A0.#.?A #SX.}Output parity:G11 A. IgnoreG1 B. ODDG1 C. EVENG1 D. 1G1#!R>#:*G1R>:> 1.&. 0b . .A$.D".A0 . #.?A!!#SX.}Input parity:G11 A. IgnoreG1 B. ODDG1 C. EVENG1 D. 0G1#!  R>#:*G1R>:> 1.&. 0+ .l .A$.D".A0I .l #.?A!!# SX. }Translation:G11 A. Pass allG1 B. Translate to ASCIIG1#% R>#:*G1R>:> 1.&.A 0 %!! . .B 0 %!!ߓ. }Upload ModeG11WAIT^Q,1'0M ONG1.T OFFG1PAUSECR,(BEG1 ECHOBACK,1$0 ONG1. OFFG1XMODEM,1)0 ONG1. OFFG11Enter option,value> 1&!0 &WAIT^Q 0! ON 0 '. OFF 0 '. . . PAUSECR 0c 0123456789t0V . .` (DC. ECHOBACK 0 ON 0 $. OFF 0 $. . . XMODEM 0 ON 0 ). OFF 0 ). . . ERRORG1P.^  !"%'($)[^L  Mw54)0'M| a. b'0wuMSPX'(0~0 '. ')S">X*0)S">XSX*Sy2XSFX')SX*50b 0w5 ERROR - uBEG1Z55Z)>S"WX0SyWX'0?0SX.SX*.KMCSr R1:VX''a'0.I'SPX0 SyXOOO* >**ÉOO *O-P-0z'0b'SyXOOO*0}>**OO**O*O-P-0 SyXOSy2X.w^ 4)0SPX'O)SFX'0g*50>`0cSPX'?O..g5ZSX$0S"WX'0?O.'Sr R1:VXSPXO*P*0+P,P**+,)P**O*-P*-0YO'.05`iSPXO.>'50`5Z^ P%00O0.O\^, %0>OZ^0^0^0^0^0^0H !"#$%%%&''()*+,-!.!O!p R$BUFFINFR$STARTCONQR$CONTROL\R$BAUDgR$TRANSLATErF$DEF}ATTACH yG1! Jeffrey Glen JacksonG1)*0,71,66,52,60,66,33,97,0,00,124,2,2,2,2,2,127,0,00,28,2,2,2,2,6,10,0,00,127,2,2,2,2,2,2,0,00,127,2,66,66,66,66,66,0,00,28,2,2,2,2,2,2,0,00,14,4,4,4,4,4,4,0,00,127,66,66,66,66,66,66,0,00,6,9,233,65,65,65,62,0,00,16,28,4,4,0,0,0,0,00,124,2,2,2,2bSYcSS=$_from: V*.*VYVY&c?c*|SS=$_to: V*.*VYVY&S2WV0VYDCS2WAITV0VYDC S2DSV0VYDCS2QV0VYDCS2QUERYV0VYDC S2AV0VYDCS2APPENDV0VYDC S'Y>SHXzh-ib'Xb'0:->SWYcSY&ct1!ct:!0i>zc!00COPY c (Y/N)? 1&N 0..Y!0.s-ic4-u--SWWY&0  4.utD 0hMh455MREPLACE  (Y/N)? 1&N 0Z..hY!0h.!54-u0->---.5->-i50cSY&.c&.iL-iMa'/Xb'Mu0ERROR uBEG1L./-`/MOUNT DEST. DISK, PRESS 1&/MOUNT SOURCE DISK, PRESS 1&/M0SSXz.SHXz/M0SHXz.SSXz/0SSXz.SHXzh^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^HB$cncc^dyc!c".Sc$cc^c!o0c#c8$`c|Ʃ^ $8Fϡb@ ^0"b#9{HF$DIR1F$MATCHF$WORDF$DEFP$DIR0P$SCAN0P$SCAN2'F$SCAN12F$POS=DOS$CONFIGDHDOS$CONFIGSSS2APPENDV0VYDC,2,124,0,00,127,2,2,2,2,2,2,2,232,32,62,1,6,8,8,8,0,00,92,98,65,65,65,65,94,0,00,0,255,65,65,65,65,127,0,00,12,2,2,2,2,2,14,0,00,12,2,2,2,2,2,2,2,20,0,254,33,65,65,65,62,0,00,119,34,34,34,18,10,124,0,00,124,34,50,34,2,2,124,0,00,124,34,50,34,2,2,2,2,20,119,34,62,1,1,1,126,0,00,119,34,36,40,48,32,32,32,320,124,2,66,68,88,96,64,64,640,124,2,2,2,2,2,2,0,064,127,74,74,74,82,84,124,0,02,127,74,74,74,82,84,124,0,00,126,65,65,65,33,33,65,0,00,0,00,28,00,28,80,20,80,8,016,8,48,0,84,112,44,112,364,80,360,0,00,20,00,0,00,64,640,64,192,2,2,2,6,10,0,00,127,2,2,2,2,2,2,0,00,127,2,66,66,66,66,66,0,00,28,2,2,2,2,2,2,0,00,14,4,4,4,4,4,4,0,00,127,66,66,66,66,66,66,0,00,6,9,233,65,65,65,62,0,00,16,28,4,4,0,0,0,0,00,124,2,2,2,296,28,GenderD.WoD,uncleD.WoDAH,auntNABiY',prophetNUBiY'AH,prophetessSW.S,horseSW.SAH,mare'iYc,man'ic.AH,woman'AB,father'Em,motherB.En,sonB.at,daughterYWom,dayt.WoRAH,lawB.+OQeR,morningMUNWoRAH,lampstand!e+ReB,eveningB.UHEMAH,animalLa+YULAH,nightRAhEL,eweSE+PeR,scrollD.e+Let,doorciYR,songWU,andCADeH,fieldHa,theQWoL,voiceB.a+Yit,house7,27,AdjectivesTWoB,goodRa!,badYAPeH,beautifulG.ADWoL,greatQATAn,smallZAQEn,old (being)YAcAn,old (thing)XA!iYR,youngcAhWoR,blackLABAn,whiteQADWoc,holycANAH,yearB.a+Yit,houseYe+LeD,boyYaLUD.AH,girl!Ex,treeMicUP.AhAH,familycEm,nameB.URAKAH,blessing'WoR,lightt.WoRAH,law'eL,toMin,from!aL,on!im,witht.a+hat,underB.ULiY,without9,19,PluralsG.WoY,nationG.WoYim,nationsK.WoKAB,starMiXUWAH,commandmentP.ARAH,cowMaMULAKAH,kingdom'NAciYm,men!am,people!aM.iYm,peoplesRO'c,headRA'ciYm,headsYAMiYm,daysB.AtiYm,housesB.aNiYm,sons'ABWot,fathersLEYLWot,nightsNAciYm,womenB.ANWot,daughterscANiYm,years10,27,(Pro)nouns!RABiYm,eveningsYe+LeD,boyG.e+BeR,manMe+LekU,kingK.e+Rem,vineyardB.e+GeD,garmetGe+cem,rainK.e+LeB,dogNa+!aR,youthNa+haL,riverca+!aR,gateP.e+Rah,flowerZe+Bah,sacrificeNe+Pec,soul'e+Rex,earth'ANOKiY,I'at.AH,thou (m)'at.U,thou (f)HW.',heHiY',she'Na+hUNW.,we'at.em,you (m)'at.en,you (f)HEm,they (m)HEn,they (f)'ADAm,Adam'Ah,brother12,15,VerbsG.AMaR,finishNAtan,givecAMaR,gaurdHALakU,walkSAGaR,shut!aMaD,stand'AKaL,eatLAMaD,learnK.AtaB,write'AMaR,sayYALaD,give birthYAcaB,sitB.Wo',comeD.iB.ER,speakHAYAH,be13,14,Present TenseYAD,handRe+GeL,foot!a+Yin,eye'+OZen,ear'eXUB.a!,fingerXE+LA!,rib!eXem,bonecEn,tooth'ap,noseG.aB,backP.eH,mouthRO'c,headYAXA',go outYADa!,know14,19,More VerbsHaR,mountain'DAMAH,land'OHeL,tentMaLU'AkU,messenger!WoLAm,eternityt.aP.+W.ha,appleL+W.ha,tablet!iYR,cityZAKaR,rememberRAKaB,rideYAXA',go outYAcaB,sitYADa!,knowRA'AH,seeG.ANaB,steal'e+Rex,earth'ehAD,oneYUHOWAH,LORD'LOHiYm,God15,17,DemonstrativescAMa!,hearLAQah,take!ACAH,makecALah,sendcAKah,forgetSALah,forgiveQARA',callZeH,this (m)ZO't,this (f)'E+L.eH,theseMULA'KAH,work!am,peopleMiNUhAH,giftHaR,mountainHARiYm,mountainscANAH,year!iYR,cityoRAH,lampstand!e+ReB,eveningB.UHEMAH,animalLa+Y=<'<M7 9 9BIBHEBG1 0 Exit to DOSG1$9< <BE < (<BE)G1Which vocabulary> 1 1 1 =& = = 0<<. =1 =&7 9 9BIBHEBG11<0& SC ORE=d< < BE% (==! ! \^ S BIBHEB.CHRVY4)DCDCDCDC!DCDCDCDCDC DC*)DCDCDC*5S BIBHEB.DATVY4M'$9%9$9DC$9DC$9&$9%9'%9$9"%9)&&*%9$9$9$905[^6 }G2=Xb  'A==++-.EoUuieAaO'BGDHWZhTYKkLMmNnS!PpXxQRCct=t=0==' =)== ==*.=0#==>.= 0==>.= 07= = >.=0N7G1L. = )== == >== *Z^H,,%99$9%9!&96;$ V;n<<<<<<<<<<d< = =y =========F$DEFATTACH{1000 DEF PACKAGE1010 DECLARE1020 STRING(24) HEBREW$(299)1030 STRING(16) ENGLISH$(299)1040 BYTE VOCAB(15),VOCAB_SIZE(15),NEXT_VOCAB,NEXT_WORD1050 STRING(32) VOCAB$(15)1055 BINARY VOCAB_START(15)1060 BYTE C(27,9),V(15,2)1&500 RECPROC ATTACH1700 PRIVATE1710 PROC DISPLAY(STRING(*))1720 BINARY I,J,K1730 FNC(BYTE) RND(BYTE)1740 BYTE O,S,CORRECT,L1,RECORD(99),WORD1745 RECFNC(STRING) F$DEF(STRING(*))1750 STRING(120) REPLY$1995 ENDDECLARE'1999 I=0:O=&22000 REPEAT2005 GRAPHICS &02010 POKE 708,202:POKE 710,12*162020 PRINT "BIBHEB"2025 PRINT " 0 Exit to DOS"2030 FOR L1=0 TO NEXT_VOCAB-12040 PRINT " ";VOCAB(L1);" ";VOCAB$(L1);" (";VOCAB_SIZE(L1);")"205(0 NEXT L12060 TRAP 2075:PRINT "Which vocabulary> ";I:PRINT "Which vocabulary> ";:INPUT I2062 IF I=0:STOP:ENDIF2065 K=-12066 FOR L1=0 TO NEXT_VOCAB-12067 IF I=VOCAB(L1)2068 K=L12069 ENDIF2070 NEXT L1)2075 PRINT:PRINT2080 IF K=-1:GOTO 2000:ENDIF2085 PRINT "Do you with to:"2090 PRINT " 1) Review ";VOCAB$(K);", or"2100 PRINT " 2) Be tested on ";VOCAB$(K);"?"2110 TRAP 2200:PRINT "> ";O:PRINT "> ";:INPUT O2200 TRAP 20*00:GRAPHICS &62210 POKE 708,202:POKE 710,12*162220 S=VOCAB_SIZE(K):CORRECT=&02230 FOR L1=0 TO S-12240 RECORD(L1)=&02250 NEXT L12260 FOR L1=&1 TO S2270 REPEAT2280 WORD=RND(S)2290 UNTIL RECORD(WORD)=&+02295 RECORD(WORD)=&12300 WORD=WORD+VOCAB_START(K)2310 CALL DISPLAY(HEBREW$(WORD))2320 IF O=&12330 PRINT "} ";ENGLISH$(WORD);2340 INPUT REPLY$2350 ELSE2360 PRINT "} , > ";:INPUT REPLY$2370 IF REPLY$=ENGLISH$(WORD)2380 CORRECT=CORRECT+12390 ELSE2400 PRINT " ";ENGLISH$(WORD);:INPUT REPLY$2410 ENDIF2420 ENDIF2430 NEXT L12500 GRAPHICS- &02510 POKE 708,202:POKE 710,12*162520 PRINT "BIBHEB"2530 PRINT2535 IF O=&22540 PRINT " SCORE=";100*CORRECT/S;"% (";CORRECT;"/";S;")"2545 ENDIF2550 PRINT "Hit to continue";:INPUT REPLY$2560 . UNTIL &17000 DEF RND(R)7010 DECLARE7020 BYTE C7099 ENDDECLARE7100 C=PEEK(53770)7110 RET C-C/R*R7120 ENDDEF8000 DEF ATTACH8010 DECLARE8020 BINARY I,J8090 ENDDECLARE8100 OPEN# &1,&4,&0,F$DEF("BIBHEB.CHR")8110 FOR I=0 /TO 278120 INPUT# &1,C(I,0),C(I,1),C(I,2),C(I,3),C(I,4),C(I,5),C(I,6),C(I,7),C(I,8),C(I,9)8130 NEXT I8140 FOR I=1 TO 158150 INPUT# &1,V(I,0),V(I,1),V(I,2)8160 NEXT I8170 CLOSE# &18200 OPEN# &1,&4,&0,F$DEF("BIBHEB.DAT")8210 TRA0P 8900:NEXT_VOCAB=&0:NEXT_WORD=&08220 REPEAT8230 INPUT# &1,VOCAB(NEXT_VOCAB),VOCAB_SIZE(NEXT_VOCAB),VOCAB$(NEXT_VOCAB)8240 VOCAB_START(NEXT_VOCAB)=NEXT_WORD8250 FOR I=NEXT_WORD TO NEXT_WORD+VOCAB_SIZE(NEXT_VOCAB)-18260 INPUT# &11,HEBREW$(I),ENGLISH$(I)8270 NEXT I8280 NEXT_WORD=I8290 NEXT_VOCAB=NEXT_VOCAB+18300 UNTIL NEXT_VOCAB=158900 CLOSE# &18910 RET8999 ENDDEF9000 DEF DISPLAY(WORD$)9010 DECLARE9020 BYTE CHAR,I9030 BINARY BASE,X,J9099 2ENDDECLARE9100 POKE 708,2029110 PRINT# &6,"}"9120 BASE=DPEEK(88)+12+20*309130 FOR I=&1 TO LEN(WORD$)9140 CHAR=INSTR("+-.EoUuieAaO'BGDHWZhTYKkLMmNnS!PpXxQRCct",MID$(WORD$,I,&1),&1)-&169150 IF CHAR<=&1279160 BASE=BASE-191730 FOR J=0 TO 99180 POKE BASE+J*20,C(CHAR,J)9190 NEXT J9200 ELSEIF CHAR=-&19210 POKE BASE,PEEK(BASE) OR &1289220 ELSEIF CHAR=-&119230 POKE BASE,PEEK(BASE) OR &89240 ELSEIF CHAR=-&139250 POKE BASE+44*20,PEEK(BASE+4*20) OR &169255 ELSEIF CHAR=-&169256 PRINT WORD$:GOTO 92569260 ELSE9270 FOR J=9 TO 119280 POKE BASE+J*20,PEEK(BASE+J*20) OR V(-CHAR,J-9)9290 NEXT J9300 ENDIF9310 NEXT I9320 RET9330 ENDD5EF9999 ENDKAGE1010 DECLARE1020 STRING(24) HEBREW$(299)1030 STRING(16) ENGLISH$(299)1040 BYTE VOCAB(15),VOCAB_SIZE(15),NEXT_VOCAB,NEXT_WORD1050 STRING(32) VOCAB$(15)1055 BINARY VOCAB_START(15)1060 BYTE C(27,9),V(15,2)1 !! ^!! ^!! ^!! H!)J!KKKKKKKF$DEFF$SCAN1F$POSP$SCAN0P$SCAN2P$DIR0 F$DIR1!! ^!! ^!! ^$ REM EMPTY SETUP  F$DEF P$CMD F$WORD ATTACH ,2000 Jeffrey Glen JacksonG11MNEW BE&.51u@0Non existant lineG1.TuA0Out of memoryG1.TuB0Too many line\   S Y& 02 )SAW X*.?SA DCTXL^K  0   ?  0 BE 1.     0 BE 1 0NO ERRORG1.  0FLOATING POINT A9DD OVERFLOWG1.  09 FLOATING POINT SUBTRACT OVERFLOWG1.  0k FLOATING POINT MULTIPLY OVERFLOWG1.  0 FLOATING POINT DIVISION OVERFLOWG1.  0%TOO HIGH DIM NUMBER IN BOUND FUNCTIONG1.  0!CONVERSION ERROR: F:LOAT TO BINARYG1.  0:!CONVERSION ERROR: STRING TO FLOATG1.   0l CONVERSION ERROR: BINARY TO BYTEG1.   0E TO A POWER OVERFLOWG1.   010 TO A POWER OVERFLOWG1.   0BASE E LOG OF NEGATIVE NUMBERG1.   ;0BASE 10 LOG OF NEGATIVE NUMBERG1.  0Q%NEGATIVE EXPONENT TO RAISE TO A POWERG1.  0%MULTIPLY OVERFLOW IN RAISE TO A POWERG1.  0)E TO A POWER OVERFLOW IN RAISE TO A POWERG1.  ?0GENERIC MODULE ERRORG1.  <0 BREAK ABORTG1.  0,CHANNEL ALREADY OPENG1.  0PNONEXISTANT DEVICEG1.  0tCHANNEL WRITE ONLYG1.  0ILLEGAL HANDLER COMMANDG1.  0DEVICE/FILE NOT OPENG1.  0BAD CHANNEL NUMBERG1.  =0 CHANNEL READ ONLYG1.  0' END OF FILEG1.  0ITRUNCATED RECORDG1.  0iDEVICE TIMEOUTG1.  0 DEVICE NAKG1.  0SERIAL FRAME ERRORG1.  0CURSOR OUT OF RANGEG1.  0SERIAL BUS OV>ERRUNG1.  0CHECKSUM ERRORG1.  05DEVICE DONE ERRORG1.  0ZILLEGAL SCREEN MODEG1.  0FUNCTION NOT IMPLEMENTEDG1.  0INSUFFICIENT RAMG1.  0PORT ALREADY OPEN (RS-232)G1.  0CONCUR?RENT MODE NOT ENABLEDG1.  0-ILLEGAL USER SUPPLIED BUFFERG1.  0_ ACTIVE CONVURRENT MODE I/O ERRORG1.  0CONCURRENT MODE I/O NOT ACTIVEG1.  0DRIVE NUMBER ERRORG1.  0TOO MANY FILES OPENG1.  0@ DISK FULLG1.  0#UNRECOVERABLE SYSTEM I/O ERRORG1.  0IFILE NUMBER MISMATCHG1.  0jFILE NAME ERRORG1.  0POINT DATA LENGTH ERRORG1.  0 FILE LOCKEDG1.  0DEVICE COMMAND INVALIDG1.  A0DIRECTORY FULLG1.  0 FILE NOT FOUNDG1.  07 POINT INVALIDG1.  0W ILLEGAL APPENDG1.  0 BAD SECTORS AT FORMAT TIMEG1.  0 INCOMPATIBLE FORMATG1. 0 UNKNOWN ERRORG1Z^ H !B # # F$WORD )SAW X*.?SA DCTXL^K  0   ?  0 BE 1.     0 BE 1 0NO ERRORG1.  0FLOATING POINT A$BASIC Extrinsic Command BASIC sourcefile [/OBJECT=file] [/LIST=file] [/ERROR=file] [/BASE=address] BASIC CompilerBATCH Intrinsic Command BATCH filespec Executes list of commands. Each line should start with "$ ".BOOT Extrinsic Command BOOT DReboot ComputerC0 Extrinsic Command C0 Set left margin to column 0C2 Extrinsic Command C2 Set left margin to column 2CAR Extrinsic Command CAR Run CartridgeCAT Extrinsic Command CAT filespec [/QUERY] Copy text files to screen. /QUERY vEerify each when multiple files match filespecCATLG Extrinsic Command CATLG filespec1 filespec2 Write DIRectory of files that match filespec1 to filespec2.CLS Intrinsic Command CLS Clear screen.COMMAND Package LOAD COMMAND RECFNC(STHBASICBATCHBOOTC0C2CARCATLGCLSCOMMAND4'RM(#R3&At !0AO2A'.u~0ERROR - uBEG1LHy~O RECEI/tCBASICCuBATCHCBOOTDC0DGC2D~CARDCATE7CATLGECLSECOMMANDICONFIGICOPY>CR2EOLDEFOBJ=DIRDISKCOPYEDITQENDEOL2CRERASEOFILESFLOADFORMAT?GAME]SDCOPYnSETSETTIME[SHOWoSRING) F$DIR1 RECFNC(STRING) F$MATCH(STRING(*),STRING(24)) RECPROC P$SCAN0 RECFNC(STRING) F$SCAN1(STRING(*),STRING(*)) RECFNC(STRING) F$POS(BYTE,STRING(*),STRING(*)) RECPROC P$SCAN2 RECFNC(STRING) X$PAD(STRING(*)) RECFNC(STRING) X$UNPAD(STRING(*))ICONFIG Extrinsic Command CONFIG [n S|D] Configure disk drive to be Single or Double Density. Without arguments, it displays current configuration.COPY Extrinsic Command COPY filespec1 filespec2 [/WAIT] [/SINGLE] [/QUERY] [/APPEND] Copy filesJ matching filespec1 to names matching filespec2. /WAIT means prompt to insert source disk /SINGLE means prompt to insert destination disk /QUERY means ask to copy each file /APPEND means to append source files toSjYSS$_File: VVYVY&SuY 4MfRP 0`QO095^^^^HTrINanSTsfR(erBF A$,boCHrtR$ed(2P$SCAN0jP$SCANL2uF$POSF$DEF$_File: VVYVY&SuY 4MfRP 0`QO095^^^^HTrINanSTsfR(erBF A$,boCHrtR$ed(2P$SCAN0jP$SCAN8B9SY&9 0* $_blocks: 19&9DCbd>9DC 0S?z=9DC=0{j>7A'.j>= 7SYL^>j>=?'A'[^j>7[^Aj> 'A'NA= '[^0$'./'A'?'b0g'b'.=0u>zb0b'b''.b'b'''[^$ '$?'.AO'..b.0$$.'..b'...b.0_..bb'.'..b'.u$'.'b.0b.b'.b''[^H9=>.?CACPCCCEGIKF$WORDCLRHEAPALLCFREEATTACHDETACH'.j>= 7SYL^>j>=?'A'[^j>7[^Aj> 'A'|0]1^q\^1 8S SWXU@(1!UX(8@e0j88@(1!(.8@ew088@(1!(8@W308@e8(.8@W3w08@ew8(2;`Y888<PR88=uW18R8>A&88>333088(2?fffp88@8\^I S'S@W3UXUX\^k S'WXS?WX\^g1Z^g1Z^ 0\?PN\^ 10?tS)%\.S\^ 10@W)WyP\.$\^/ WPo(>@wP?cfw @W3(V1S}XD>(JS?WX(>DS'WXPJJ(>Do<0qW0>>w(1VSWX\^&T0z.0$Sr@W3UX\.B0AS%UX\.0nS@eUXS%UX\.S@ewUXS%UX\^& SWSwBUXUX\^!& SW"XwS@W3UX\^+& ,k,wk?PU\^5& 6k6wk?P\^?& @wkw@k@wkBB\^DI& JSJJBUXm\^gS& TSTTBUXm\^]& ^B^Bm?P\^& >\^{& >  >\^g&SXBBU6V\^&S TTX\^{&|S SXBU|BUXC\^=g&hrhSX\^Z&0rXB(.{XB(XXl?Pq(0X@X(X?PqX\H1111W1111111111111111111111112X8>DJPVWXMODFLT SIN'COS?TANaSQRATN%ATN2ASNACSSINHCOSHTANHASNH:ACSH]ATNHRAD}DEGRNDRAND3RND2RAND2 RND1RAND1ROUNDP=uW18^q\^1  S SrW XU@(1!UX?cfw (q(o@0|r(.@0(.o0(.r((<E=YU>`C0Z>Fu30?ba?dYd p(@W3\^96 S'S@W3UXUX\^[6 S SrWXU@eUX@'25D(@0@(.@w0@((A%fquP@&Sf7 BBFc(A6a[vB"DH9B6Vy(\^(hZ^:hZ^L'h (0d\(?PN\^|h 0?tS)%\.\^h 0@W)WyP\.\^1h 2(0\o(@0&@((@tDA$@UIg0@UTPd?X0(@tDACx3S@ES`@ (0SwUX\.0S@W3UX\.0S]@W3UX\.SW|X\^O S#WPSBPwPBUXUX\^8Y SWZXwS@W3UX\^Zc dkdwk?P\^ym nknwk?P\^w xwkwxkxwkBB\^ SBBUXm\^ SB^BUXm\^ BBm?P\^-;<F0Pz.F0uS<r@W3UX\.F0S<FUX\.<0S@eUXS<FUX\.S@ewUXS<FUX\^_ >\^ >  >\^SXBBU6\^0SBTTX\^LS SXBUBUXC\^uS X\^0B(.B(l?Pq(0@(`?Pq\Ha %+17=CIJMODFLT SIN'COS/TANQSQRBATNATN2#ASNACS.SINHPCObSHoTANHASNHACSHATNHRADDEG0RND RANDkRND2RAND2BRND1RAND1&ROUNDo@0|r(.@0(.o0(.r((<E=YU>`C0`Choose a configuration:G11D1:*.?4&A0i ttG1&.95K:41 Press a key> 1P@G15S $ BATCH *.@VX^H0յP$CMD0t2 uY&wR'R'PRO'(R'' 'x'7 SURROUNDG11uSHow many players (1/2)? VuTTTXeSScoring (Y/N)? VWX&vY wSDot size (0/1/2/3)? VwTTTXSSpeed (0-100)? VW\TTX'SWinning Score (5-255)?VTTTXSTime limit (30-1000 sec)?VWpTTX'< '  fSSPress RETURN to begin *VVX&''v'  wR ' '4w 44w7 99 98;wR >0uSX'SX 0i0f' .0 ''44 v04:P0  q bDOS SYSbBOOT OBJbC0 OBJbCAR OBJb COMMAND OBJb!CONFIG OBJb#COPY OBJbCAT OBJB )MENU OBJBINOVERIFYBASBXNOVERIFYOBJBYPUTDOS OBJB?RELOCATESYSB NRS232 BASB^RS232 OBJB\RTL LIBb9FORMAT OBJb;IO OBJb?PUTDOS OBJbBRELOCATESYSCRTL LIBbFRTL SYSb`STARTUP BATbaTIME OBJB )MENU OBJBINOVERIFYBASBXNOVERIFYOBJBYPUTDOS OBJB?RELOCATESYSB NRS232 BASB^RS232 OBJB\RTL LIBbcCONFIG SYSbOdBASIC OBJbDISKCOPYOBJbCATLG OBJbEDIT OBJbFILES OBJb MENU OBJb7NULL 0 B )MENU OBJBINOVERIFYBASBXNOVERIFYOBJBYPUTDOS OBJB?RELOCATESYSB NRS232 BASB^RS232 OBJB\RTL LIBbSET OBJbSETTIME OBJbCSHOW OBJbTYPE OBJbSOUND OBJbEOL2CR OBJbC2 OBJbRS232 OBJB )MENU OBJBINOVERIFYBASBXNOVERIFYOBJBYPUTDOS OBJB?RELOCATESYSB NRS232 BASB^RS232 OBJB\RTL LIBbVERIFY OBJVOSPR OBJbVT OBJb SDCOPY OBJb BIBHEB CHRb BIBHEB DATbBIBHEB OBJb%BIBHEB OLDB )MENU OBJBINOVERIFYBASBXNOVERIFYOBJBYPUTDOS OBJB?RELOCATESYSB NRS232 BASB^RS232 OBJB\RTL LIBb)CP SYSb 8PERROR OBJbBCHELP HLPCFHELP IDXBGHELP IDXbHELPIDX OBJbHELP OBJbKCR2EOL OBJB )MENU OBJBINOVERIFYBASBXNOVERIFYOBJBYPUTDOS OBJB?RELOCATESYSB NRS232 BASB^RS232 OBJB\RTL LIBbMHEAP OBJbQMATH OBJb YMATH2 OBJbcSETUP OBJb dSURROUNDOBJb vGAME OBJJLS2 TXTCP BAKB )MENU OBJBINOVERIFYBASBXNOVERIFYOBJBYPUTDOS OBJB?RELOCATESYSB NRS232 BASB^RS232 OBJB\RTL LIBbAPROPOS OBJbEDIT E B )MENU OBJBINOVERIFYBASBXNOVERIFYOBJBYPUTDOS OBJB?RELOCATESYSB NRS232 BASB^RS232 OBJB\RTL LIBSAX.84;.bwR0b44w0b84;S Xd )*SX.0"  0 PLAYER 2 WINSG1.#  0 r PLAYER 1 WINSG1.# TIE!G1SPlay again (Y/N)? VYVX&N 0L^]LG11&A0]\^V) SSWWX&) Y ) N ) y ) n 0) y 0Y\.) n 0N\s.) \^`(- SSWBEVX&- ?00+ - DC'+ + 0+ \^Kt} SURROUNDG1 PLAYER ONE= BE PLAYER TWO= BEG1Z^&^&^&^&Huvtwx| !#%'/79;;;;;u;;;;;;;;;;y;) + - STARTVSTICKHSTICKSOUND SURROUNDG11uSHow many players (1/2)? VuTTTX`d^B 0?z.)p>\^4 B 0D?z.Ox >\^Z)B bS*W*Xb0{\.b0v\.\^3L cS*W4Xc0v\.c0\.\^V 0?z.w|>\^V 0!?z./ >\^:)V4>\^K)V5>\^\=V>\^s=V>\^=V>\^=Vd>d\^y` z0aa.z0aa.?z҃xaZ^` 0aa.401aa.4?z҃aZ^G`00haa.0aa@.?z.00aaߓ.0aa .?z.?z҃aZ^`00aya.0aa.?z.X0U08aa.R0Oaa.R?z.X?z҃aZ^k`(aҘSWWWWXZ^`(a0aaҘҘ.a0aaҘzҘ҃a0 ?z   Z^J`(0aaa.{0xaa.{?z$0?z҃a      ${ Z^-`aҘE&'Z^*e` >\^;Q` >  >\^W=`S1XBBU6\^qe`SfTpTX\^Q`RSS1XBU\RBUXC\^=`>H>SMX\^-`.8.8q\^|-`a[Habbbbbbbbbbbbbbbbbbbbbb}bbbbbbbbbbbcdPADDLESTICK*PTRIGSTRIGVPENAHPEN0VSTICKPHSTICKOPTIONRSELECTiSTARTHELPRNDMRANDRND21RAND2RN~D1 RAND1gSETPOLY17SETFIN15SETFIN=SETFILTERSOUNDaSOUND8SOUND16@SOUNDOFFATTACHXb0{\.b0v\.\^3L cS*W4Xc0v\.c0\.\^V 0?z.hJLS200/03/22 BASIC OBJ 079 BENCHB OBJ 001 BIBHEB B 001 BIBHEB CHR 004 BIBHEB DAT 009 BIBHEB OBJ 008 BIBHEB OLD 017 BOOT OBJ 001 C0 OBJ 001 C2 OBJ 001 CAR OBJ 001 CATLG OBJ 001 COMMAND OBJ 009 CـONFIG OBJ 002 CONFIG SYS 001 COPY OBJ 006 CP SYS 015 CP2 SYS 016 CRTOEOL OBJ 002 DISKCOPYOBJ 004 DOS SYS 017 EDIT OBJ 014 FILES OBJ 005 FMODEM F 001 FORMAT OBJ 002 GAME OBJ 009 HEAP OBJ 004 IOف OBJ 004 JLSII J 001 MATH OBJ 008 MATH2 OBJ 010 MENU OBJ 012 MODEM M 001 NORMAL N 001 NOVERIFYOBJ 001 NULL 0 001 PUTDOS OBJ 003 RELOCATESYS 001 RS232 OBJ 005 RTL LIB 003 RTL SYS 026 SDCقOPY OBJ 006 SET OBJ 002 SETTIME OBJ 002 SETUP OBJ 001 SHOW OBJ 003 SOUND OBJ 002 STARTUP BAT 001 SURROUNDOBJ 009 TIME OBJ 002 TYPE OBJ 006 VERIFY OBJ 001 VOSPR OBJ 004 VT OBJ 023337 FREE SECTORS370 USEكD SECTORS54 FILESASIC OBJ 079 BENCHB OBJ 001 BIBHEB B 001 BIBHEB CHR 004 BIBHEB DAT 009 BIBHEB OBJ 008 BIBHEB OLD 017 BOOT OBJ 001 C0 OBJ 001 C2 OBJ 001 CAR OBJ 001 CATLG OBJ 001 COMMAND OBJ 009 C2uF$POSF$DEF$_File: VVYVY&SuY 4MfRP0`Q O095^^^^H !6ABP$SCAN0jP$SCANt>07Xb'Ϙ5MD>0DΘD:&D:&ϘϘ'b'π'('  yJ' F$DEF&y'F$ALLOC&yv'F$WOR݆D&%y)''P$CMD&-'/π0'ϘϘM| D:STARTUP.BAT4ςϘR5 D:STARTUP.BAT&.Ϙz5MϘ' '!Ζ0Sʀ}VYΘu0SYSTEM ERROR - uBEG1z-ØzM0xƒ݇'A0‚';ϤϘ0xƒϖ0YMYϘ4πϘQ'3&ςϘR5ϖ0V'G1.r˜5MϘ$ 1'3&ϘS)W:WX.΀}&0‚π A'΀}&/ 0‚πb'΀}&π A'΀݈}&/πA'΀}&/ϖ0'ÂϘϘ/^3 SvY&$ 03 0PZLOAD FLOAD 0wSYSvYVY.KILL 0SSvYVY.PROTECT 0SJSvYVYd. UNPROTECT 0SJSvYVYe.ERASE 0SJSvYVYf.݉RENAME 0 SJSvYVYg.DEF 0>ĂSvY& 04G1.;Ă&.OBJ 0oĂSvY& 0eG1.lĂ&.END 0ĂϘ.SCREEN 0ĂϘ.NOSCREEN 0ĂϘ.DIR 0łSvY&SJ*.*VY4MĘ݊3&G1.Ę5M.REPEAT 0"͘Ϙ.3.MDIR XDIR 0łπ''-!0|bBEbBEG1.1!0XDIR 0 bBEG1-.  0I1XbBE freeG1.݋BATCH 0&ƂSJSvYVY.BAT&Ϙ4ςϘR5Ϙ.TRAP 0=ƂϘ.NOTRAP 0VƂϘ.PAUSE 0w1-Ƙϥ&.PRINT 0-.CLS 0Ƙ7 '!.REM 0͘Ȑ.S#W ΘYπb>'݌b'b'Z;͘Ϙ0%ǂA͘ώ0L͗͘Ϙ͒tG1.P1̓ϐ/^c4 @ 0pǘzzSWY&H΀'LOAD 0S#WzΘY0[:0.OBJ&..OBJ&Θݍ44Θ40w4Θ40w>Θ>>'RH>'HΘaHHbb0HȘz>Ha>Hb'H>'π'H'π'z&>> zA'H>'H'H'h\'f'MΘݎ3&!0d4Θ44H'πb''- 0N  0Θ Unresolved: G1-.Y 4΀bi3&.Ș3&pΘATTACH 0\pH'.d.DETACH 0fpH'.dɀpH'&>>A'ݏH>'.dɗΖ0f'\'>'f''π''M5\0W y\iSYΖ0oSWzY'.vʂπ'[What?G1-.^Ͷ S#W͘Yb0 ỳbiSYπb'π0ʂπݐb''[^ ζ  : .Ϙ0'˂ A΃ό06] Η΃ϗΒt]^T :0p].u]^#&A̓ό0͗͘t& 0͗͘.&͗̓͘ݑό0͗͘t& !0; 0 ̂Ϙ].̂Ϙ]^![^-SWY&π'΀}&!0x 0a[πb'΀}&.K̗͘0SYWY0̂Θ[͘0What?G1-..̂'[^ ݒb'΀'π'']Hy'ݓ  !ݗ destination files Options may be abbeviated to one letter.CR2EOL Extrinsic Command CR2EOL filespec Modifies specified file to change ASCII CR characters to ATASCII EOL charactersDEF Intrinsic Command DEF [D[n]:] Sets default device. If nodQQ357Xb'Ϙ5MD>0DΘD:&D:&ϘϘ'b'π'('  yJ' F$DEF&y'F$ALLOC&yv'F$WOR device is specified, displays current default. This is the default device used for filespec arguments and is the first place searched for modules that don't have a device specified.OBJ Intrinsic Command OBJ [D[n]:] Sets default device for LOADing modules if they are not found in the DEFault locationDIR Intrinsic Command DIR [filespec] Lists directory of files that match the filespec. By default, Dn:*.* is listed where Dn: is the default device.DISKCOPY Extrinsic Command DISKCOPY n1 n2 Does a sector by sector copy of Dn1: to Dn2:. n1 and n2 may be the same drive. You are prompted to insert each disk until the source disk is copied.EDIT Extrinsic Command EDIT [filespec] [/LINES=n] Edits a file. See manual for detailed description. /LINES sets max number of lines from the default 512 Command summary: line#, line# text, DELETE from [to] DOS, FIND text, FREE, GET filespec LIST [from [to]], LOAD filespec MERGE filespec, NEW #lines PUT [filespec [from [to]]] REN [start] [increment] SAVE [filespec [from [to]]] $ commandEND Intrinsic Command END Deactivates BATCH modeEOL2CR Extrinsic Command EOL2CR filespec Transforms ATASCII EOL characters in specified file into ASCII CR characters.ERASE Extrinsic Command ERASE filespec Deletes files matching filespec.FILES Extrinsic Command FILES [filespec] [/OUTPUT=filespec] [/LABEL=string] [/DATE=string] [/NUMBER=number] [INIT=string] Lists files matching filespec in alphabetical order. Can add strings to heading and prefix with initialization string for sending to printer. Lists all files on default device to screen by default.FLOAD Intrinsic command FLOAD filespec Loads module, even if already loaded.FORMAT Extrinsic Command FORMAT drive Formats the specified drive number.GAME Package LOAD GAME Library of functions for games. FNC(BYTE) PADDLE(BYTE),STICK(BYTE) FNC(BYTE) PTRIG(BYTE),STRIG(BYTE) FNC(BYTE) VPEN,HPEN FNC(BYTE) VSTICK(BYTE),HSTICK(BYTE) FNC(BYTE) OPTION,SELECT,START,HELP FNC(FLOAT) RND,RAND(FLOAT,FLOAT) FNC(BINARY) RND2,RAND2(BINARY,BINARY) FNC(BYTE) RND1,RAAND1(BYTE,BYTE) PROC SETPOLY17(BYTE),SETFIN15(BYTE) PROC SETFIN(BYTE,BYTE) PROC SETFILTER(BYTE,BYTE) PROC SOUND(BYTE,BYTE,BYTE,BYTE) PROC SOUND8(BYTE,BYTE,BYTE,BYTE) PROC SOUND16(BYTE,BINARY,BYTE,BYTE)SDCOPY Extrinsic Command SDCOPY filespec1 filespec2 [/DS] [/WAIT] [/QUERY] [/APPEND] Single to Double Copy. Copies files between different density disks with a single disk drive. /DS to copy from double to single /WAIT /QUERY /APPEND are the same as in COPYSET Extrinsic Command SET [/LEFT=n] [/RIGHT=n] [/CHAR=n] [/BACKGND=n] [/FINE=1] [/DELAY=n] [/REPEAT=n] [CLICK=n] Set various system variableOUNDTIMETRAP-TYPE UNPROTECThVERIFYREMJRENAMEREPEAT1RS232^SCREENKILLLOADMDIRNOSCREEN`NOTRAPPAUSEPRINTLPROTECTPUTDOSXDIRCPIOMATHELSEELSEIF$ENDIFJENDWHILEys /LEFT set left margin /RIGHT set right margin /CHAR set character color /BACKGND set background color /FINE turn on fine scrolling /DELAY set key repeat delay /REPEAT set key repeat rate (1/60ths of a second) /CLICK inhibit key clickSETTIME Extrinsic Command SETTIME hh:mm:ss Set system timer to a particular timeSHOW Extrinsic Command SHOW [LEFT] [RIGHT] [CHAR] [BACKGND] [BORDER] [FINE] [REPEAT] [DELAY] [CLIC] [DEV] [DOS] Shows various system variables. See SET for LEFT through CLICK. DEV show devices installed VERSION show JLS version DOS show drive and buffer settingsSOUND Package UntestedTIME Extrinsic Command TIME Display system timerTRAP Intrinsic Command TRAP Turn on TRAP mode. TRAP mode causes BATCH mode to end if there is an error.TYPE Extrinsic Command TYPE filespec [/HEADING=str][/QUERY][/OUTPUT=file][/LINESIZE=n][/FORMSIZE=n][/TOP=n][/LEFT=n][/INDENT=n][/INIT=s] Output text file formatted for line printer. /HEADING heading for each page /QUERY verify printing each file /OUTPUT output file /LINESIZE characters/line /FORMSIZE lines/page /TOP top and bottom margin in lines /LEFT left and right margin in chars /INDENT indent when line wraps /INIT initialization stringUNPROTECT Intrinsic Command UNPROTECT filespec Remove protection from files matching filespecVERIFY Extrinsic Command VERIFY [ON|OFF] Turn verification on or off on disk wrotes. Shows current setting by default.REM Intrinsic Command REM string REM does nothing. It is for putting REMarks in BATCH files.RENAME Intrinsic Command RENAME filespec,filename Renames files that match filespec to match filename.REPEAT Intrinsic Command REPEAT Repeats a command line. E.g., $ PAUSE ; BASIC TEST ; PAUSE ; EDIT TEST.BAS ; REPEATRS232 Package LOAD RS232 Load ATARI 850 Driver PROC OS$CIOV(BYTE,BYTE,BYTE,BYTE,STRING(*)) PROC R$STARTCON(BYTE,BINARY,BINARY) FNC(BINARY) R$BUFFIN(BYTE) PROC R$CONTROL(BYTE,BYTE,BYTE,STRING(*) PROC R$BAUD(BYTE,BYTE,BYTE,STRING(*)) PROC R$TRANSLATE(BYTE,BYTE,BYTE,STRING(*)) PROC R$FORCESCREEN Intrinsic Command SCREEN Echo commands in BATCH modeKILL Intrinsic Command KILL module Remove specified module from memory. Also removes all modules loaded after it.LOAD Intrinsic Command LOAD filespec Load a module into memory. If the specified module is already in memory, another copy is not loaded.MDIR Intrinsic Command MDIR List directory of loaded modules and display amount of free memory.NOSCREEN Intrinsic Command NOSCREEN Turn off echo of commands in BATCH mode.NOTRAP Intrinsic Command NOTRAP Turn off trap mode. Errors do not cause BATCH mode to end.PAUSE Intrinsic Command PAUSE text Display text and wait for user to press RETURNPRINT Intrinsic Command PRINT text Display textPROTECT Intrinsic Command PROTECT filespec Protect files matching filespec from being deleted or modifiedPUTDOS Extrinsic Command PUTDOS Write DOS.SYS to a disk. You are prompted for drive allocation bits, buffer count, and drive to write DOS.SYS too. Never use COPY or SDCOPY to copy DOS.SYS.XDIR Intrinsic Command XDIR List loaded modules and any external entry points they define.CP Control Program n/a The control program interprets intrinsic commands and provides the following external entry points: RECFNC(STRING) F$DEF(STRING(*)) RECFNC(STRING) F$WORD PROC P$CMD(STRING(*)) RECFNC(BINARY) F$ALLOC(BINARY)IO Package LOAD IO Low level routines for accessing disk. FNC(BYTE) DOS$STATUS(BYTE,BYTE(3)) FNC(BYTE) DOS$READ(BYTE,BINARY,BINARY,BYTE) FNC(BYTE) DOS$WRITE(BYTE,BINARY,BINARY,BYTE) FNC(BYTE) DOS$CONFIGIN(BYTE,BYTE(11)) FNC(BYTE) DOS$CONFIGD(BYTE) FNC(BYTE) DOS$CONFIGS(BYTE)MATH Package LOAD MATH FNC(FLOAT) MODFLT(FLOAT,FLOAT) FNC(FLOAT) SIN(FLOAT),ASN(FLOAT) FNC(FLOAT) COS(FLOAT),ACS(FLOAT) FNC(FLOAT) TAN(FLOAT),ATN(FLOAT) FNC(FLOAT) ATN2(FLOAT,FLOAT) FNC(FLOAT) SINH(FLOAT),ASNH(FLOAT) FNC(FLOAT) COSH(FLOAT),ACSH(FLOAT) FNC(FLOAT) TANH(FLOAT),ATNH(FLOAT) PROC RAD,DEG FNC(FLOAT) RND,RAND(FLOAT,FLOAT) FNC(BINARY) RND2,RAND2(BINARY,BINARY) FNC(BYTE) RND1,RND2(BYTE,BYTE) FNC(FLOAT) ROUND(FLOAT,BYTE)ELSE BASIC Statement ELSE See IFELSEIF BASIC Statement ELSEIF byt See IFENDIF BASIC Statement ENDIF See IFENDWHILE BASIC Statement ENDWHILE See WHILEERROR BASIC Statement ERROR byt Simulate errorEXEC BASIC Statement EXEC bin Do a machine language JSR to a machine language subroutineFOR BASIC Statement FOR var=num1 TO num2 [STEP num3]:statements:NEXT var Iterate through range of valuesGOSUB BASIC Statement GOSUB line_no Go to subroutine. See also RETURN.RETURN BASIC Statement RETURN Return from a GOSUB.GOTO BASIC Statement GOTO line_no Unconditional branchTHEN BASIC Statement IF byt THEN line_no Conditional branchIF BASIC Statement IF byt:...:ELSEIF byt:...:ELSE:...ENDIF Structured branchIF BASIC Statement IF byt THEN line_no Conditional branchNEXT BASIC Statement NEXT var See FOR statementREPEAT BASIC Statement REPEAT:...:UNTIL byt Repeat statements until conditionUNTIL BASIC Statement UNTIL byt See REPEATSTOP BASIC Statement STOP Stop executionTRAP BASIC Statement TRAP~<S@Y&< 0)< D1:HELP.HLP&.4<SKWY&<4~<.~0j]<.IDX&.}]<~tIDX&]4'RM;9R3&At !09;OAO2A'.Mu0ERROR - uBEG15] 4Q55L^VV ^VV Hy9;!<!]~~F$WORD@F$DEFK9;OAO2A9>SY&.HLP4<'<:0}> 0b'>Q_3&01_&_3&}> -_G11_3&Usage:_G11_3&M_G1_3&_!_t !0M1>'.)0*TOPIC NOT FOUNDG1L^69SHELPVY&M{.IDX4M:<SWY':<a5[M5SHELPVY&.I^ ^ ^ ^ H:<!>y%_ERROREXEC FORwGOSUBRETURNGOTO5THENtIFIFNEXT7REPEATUNTILSTOPTRAP)WHILEDEFMAINWPACKAGEDECLARE9 ENDDECLAREnBYTEBINARYFLOAT STRING8PROCeRECPROCFNCRECFNCCOLOR± line_no Branch to line if error occursWHILE BASIC Statement WHILE byt:...:ENDWHILE Repeat statements while condition is true.DEF BASIC Statement DEF name Define subroutine. Names MAIN and PACKAGE are special for the whole program and end with END instead of ENDDEFMAIN BASIC Statement DEF MAIN:...:END Encloses a programPACKAGE BASIC Statement DEF PACKAGE:...:END Encloses a package. All routines are externally visible unless PRIVATEDECLARE BASIC Statement DECLARE:...:ENDDECLARE Encloses declarations of variables and subroutinesENDDECLARE BASIC Statement ENDDECLARE See DECLAREBYTE BASIC Type BYTE One byte integer (&0-&255)BINARY BASIC Type BINARY Two byte integer (0-65535)FLOAT BASIC Type FLOAT Six byte floating pointSTRING BASIC Type STRING(maxlen) StringPROC BASIC Type PROC Procedure subroutineRECPROC BASIC Type RECPROC Recursive Procedure subroutineFNC BASIC Type FNC(rettype) Function subroutineRECFNC BASIC Type RECFNC(rettype) Recursive function subroutineCOLOR BASIC Statement COLOR byt Choose color for PLOT, DRAWTO, FILLDRAWTO BASIC Statement DRAWTO bin,byt Draw straight lineFILL BASIC Statement FILL bin,byt Fill area to the right of lineGRAPHICS BASIC Statement GRAPHICS byt Select graphics modePLOT BASIC Statement PLOT bin,byt Plot a single pixelPOSITION BASIC Statement POSITION bin,byt Select pixel position without plotting oneSETCOLOR BASIC Statement SETCOLOR byt0,byt1,byt2 Set color byt0 to hue byt1 and luminance byt2BGET# BASIC Statement BGET# byt,bin1,bin2 Block Read bin2 bytes to bin1BPUT# BASIC Statement BPUT# byt,bin1,bin2 Block Write bin2 bytes from bin1CLOSE# BASIC Statement CLOSE# byt Close channelDGET# BASIC StatementbDRAWTOFILLGRAPHICS#PLOT\POSITIONSETCOLORBGET#fBPUT#CLOSE#DGET##DPUT#ZERASEFGET#FPUT#GET#8PUT#lINPUTINPUT#LINPUT8LINPUT#NOTE#OPEN#POINT#iPRINTPRINT#PROTECT)R DGET# byt,varbin Read two bytesDPUT# BASIC Statement DPUT# byt,bin Write two bytesERASE BASIC Statement ERASE str Erase filesFGET# BASIC Statement FGET# byt,varflt Read 6 byte floatFPUT# BASIC Statement FPUT# byt,flt Write 6 byte floatGET# BASIC Statement GET# byt,varbyt Read one bytePUT# BASIC Statement PUT# byt,byt Write one byteINPUT BASIC Statement INPUT var0,var1,... Input valuesINPUT# BASIC Statement INPUT# byt0,var1,var2,... Input values from channelLINPUT BASIC Statement LINPUT var1,var2,... Input whole linesLINPUT# BASIC Statement LINPUT# byt,var1,var2,... Input whole lines from channelNOTE# BASIC Statement NOTE# byt,varbin1,varbyt2 Record current file positionOPEN# BASIC Statement OPEN# byt0,byt1,byt2,str3 Open filePOINT# BASIC Statement POINT# byt0,bin1,byt2 Change current file positionPRINT BASIC Statement PRINT str[;] Write textPRINT# BASIC Statement PRINT# byt,str[;] Write text to channelPROTECT BASIC Statement PROTECT str Protect specified file from changeRENAME BASIC Statement RENAME str Rename filesUNPROTECT BASIC Statement UNPROTECT str Remove protection from filesCHAIN BASIC Statement CHAIN str Continue reading source from another fileDPOKE BASIC Statement DPOKE bin0,bin1 Store two bytes at bin0FPOKE BASIC Statement FPOKE bin0,flt1 Store six bytes at bin0LET BASIC Statement [LET] var=expression Assignment StatementMOVE BASIC Statement MOVE bin0,bin1,bin2 Move bin2 bytes from bin0 to bin1 in assending order of addressPOKE BASIC Statement POKE bin0,byt1 Store one byte at bin0REM BASIC Statement REM text RemarkRMOVE BASIC Statement RMOVE bin0,bin1,bin2 Move bin2 bytes from bin0 to bin1 in reverse order (descending adENAME[ UNPROTECTCHAINDPOKE5FPOKEvLETMOVE'POKEeREMRMOVESPOKEMABSADRASCBINSBOUNDBYTCEXP'CHR$CHRCLOGDESC5DPEEKuERREXPFLT5FPEEKINSTR INTlLENLOGMID$dress)SPOKE BASIC Statement SPOKE bin0,str1 Store string at address bin0ABS BASIC Function ABS(expression) Absolute valueADR BASIC Function ADR(var) Address of variableASC BASIC Function ASC(string) ASCII collating value of first character of functionBIN BASIC Function BIN(expression) Convert expression to BINARYBOUND BASIC Function BOUND(var,byt) Get upper bound of array dimemsionBYT BASIC Function BYT(expression) Convert expression to BYTECEXP BASIC Function CEXP(flt) Returns 10.0 raised to the flt powerCHR$ BASIC Function CHR[$](byt) Converts ASCII collating number to string of one characterCHR BASIC Function CHR[$](byte) See CHR$CLOG BASIC Function CLOG(flt) Base 10 logarithmDESC BASIC Function DESC(var or subprogram) Returns address of descriptorDPEEK BASIC Function DPEEK(bin) Reads two bytes from addressERR BASIC Function ERR Returns most recent error codeEXP BASIC Function EXP(flt) Returns e raised to the flt powerFLT BASIC Function FLT(expression) Converts expression to FLOATFPEEK BASIC Function FPEEK(bin) Reads 6 byte FLOAT value at address binINSTR BASIC Function INSTR(str0,str1,byt2) Finds str1 in str0, beginning at byt2'th character of str0. Returns &0 if not found.INT BASIC Function INT(flt) Rounds flt to zero to an integer value. Type of result is FLOAT.LEN BASIC Function LEN(str) Length of stringLOG BASIC Function LOG(flt) Base e logarithmMID$ BASIC Function MID[$](str0,byt1,byt2) Extracts portion of str0, starting at byt1'th byte and extending for byt2 bytes. No bounds checking is done.MID BASIC Function MID[$](str0,byt1,byt2) See MID$NOT BASIC Function NOT(byt or bin) Ones Complement of BYTE or BINARYPEEK BASIC Function PEEK(bin) Reads one byte at address binSGN BASIC Function SGN(expression) Returns -1, 0, or 1 depending on expression being negative, zero, or positive.SPEEK BASIC Function SPEEK(bin) Reads string from address bin. First byte is length.STR$ BASIC Function STR[$](any) Converts number to stringSTR BASIC Function STR[$](any) See STR$VAL BASIC Function VAL(expression) Converts expression to FLOAT.RET BASIC Statement RET [expression] Return value from a function subroutine!F$ALLOCF$WORDF$DEFF$OBJATTACH,01_&_3&}> -_G11_3&Usage:_G11_3&M_G1_3&_!_t !0M1snMIDNOTPEEK.SGNSPEEKSTR$>STRiVALRET(CALLENDSETUPSURROUNDHELPHELPIDX3APROPOSBYTCEXP'CHR$CHRCLOGDESC5DPEEKuERREXPFLT5FPEEKINSTR INTlLENLOGMID$SY&M+SHELP.HLPVY4M.HM5SHELP.HLPVY4M3&!t !0t&.!00: G1.KM5^^^H!y!F$WORDF$DEFF$OBJ.HLPVY4M.HM5SHELP.HLPVY4M3&!t !0t&.!00: G1.KM5^^^H!y!F$DEFk P$SCAN0v P$SCAN2 F$SCAN1 F$POS P$CMD F$WORD ATTACHX .\dSk W Y&b'b'''}BASIC program editor V2.00G1"(c) 1985,2000 Jeffrey Glen JacksonG11MNEW BE&.5PJ or return from a procedure subroutineCALL BASIC Statement CALL procedure_name[(argument list)] Call a procedure subroutineEND BASIC Statement END End a MAIN or PACKAGE DEFSETUP Extrinsic Command SETUP Scans D1: for batch files with a sing$ LOAD COMMAND$ LOAD IO$ LOAD EDIT F$POS P$CMD F$WORD ATTACHX .\dSk W Y&b'b'''}BASIC program editor V2.00G1"(c) 1985,2000 Jeffrey Glen JacksonG11MNEW BE&.5%le letter extension and presents them in a menu. Useful as the last command of a STARTUP.BAT to select one of multiple startup scripts.SURROUND Extrinsic Command SURROUND A simple one or two player game. Requires joysticks.HELP Extrinsic Command HELP topic Display help screens from HELP.HLP file. Finds HELP.HLP and HELP.IDX first in DEF and then in OBJ at LOAD time. See also HELPIDX, APROPOS.HELPIDX Extrinsic Command HELPIDX helpfile Rebuilds HELP.IDX file, which is necessary if HELP.HLP is moved. helpfile defautls to HELP.HLPAPROPOS Extrinsic Command APROPOS word Searches HELP.HLP for word and displays topic name and line containing word. See also HELP. HELPIDX helpfile Rebuilds HELP.IDX file, which is necessary if